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Electronic  Arts  Presents  8  Good 


1.  Deluxe  Paint™ 

The  most  sophisticated  paint  program  e\'er 
made  for  a  personal  computer.  Loaded  with 
special  features  like  zoom  enlarging,  split-  / 
screen  magnification,  color  cycling, 
blend,  smear,  shade,  stretch,  bend,  and 
rotate.  The  custom  palette  mLxtng  and 
unlimited  brushes  give  you  complete 
control  over  all  of  the  Amiga's 
4,096  colors.  And  it  even 
works  in  640  x  400  hi-res  mode, 

"The  kinds  of  things  painters 
love  and  miss  in  computer 
programs  are  all  here  in 
DeluxePainr" 

—Amigaworld 


4.  Arcticfox"* 

The  tank  battle  simulator.  Feel  the  heat  of  tank 
combat  as  you  command  your  two  on-screen 
hands  and  their  arsenal  of  heavy  cannon, 
"seeing"  missiles,  and  mines.  Face 
a  highly  intelligent  enemy  in 
a  completely  three- 
dimensional  Arctic 
batdefield.  An  accurate 
simulation  of  tank  move- 
ment and  strategics,  with  the 
bone -jarring  sound  effects 
and  super  hot  graphics  of  the 
best  arcade  games. 


5.  Financial  Cookbook'" 
Take  control  of  your  finances.  Financial 
Cookbook  answers  all  your  personal  finan- 
cial questions  and  saves  you  money. 
From  checking  and  savings  accounts  to 
IRAs  and  taxes.  From  variable  interest 
rates  to  amortization  schedules. 
Performs  like  a  spreadsheet,  a 
calculator,  and  an  investment 
advisor,  all  rolled  into  one.  The 
simple  fill-in-the-blanks  format  makes 
complex  financial  questions— and  saving 
money  —  a  breeze. 


7.  Archon™ 

The  action  chess  game  with  dragons,  magicians 
and  trolls  for  pieces.  When  one  piece  lands  on 
another,  they  have  to  fight  a  white-knuckle 
arcade  battle  for  control  of  the  square.  The 
perfect  biend  of  action  and  strategy,  and  a 
classic  award  winner. 

"Game  of  the  Year" 

—  Creative  Computing 
"Most  Innovative  Game" 

—  Electronic  Games 


Amiga  is  a  leeistereJ  rradcmart  of  CommodDte  Business  Machines.  Inc-  DeluxePeim.  Slyfox.  Dr.]  and  Larry  Bird  Go  One-on-Onf .  ArciicfoK,  Financial  Cookbook. . Archon.  Sevsn  CniM  of  Gold, 
and  Elecuomc  Aris  are  registered  rr^idemarks  of  EJectronic  Art5- 


Reasons  to  Own  an  Amiga: 


2.  Skyfox™ 

Jump  into  the  cockpit  of  a  fighter  pilot's 
dream.  Enemy  tanks  and  jets  splash 
into  brilliant  flames  when  you  score 
a  hit.  You'll  hear  the  shriek  of  the 
doppler  effect  as  enemy  jets  strafe  past. 
Skyfox  is  the  fastest- selling  game  in  E.  A. 
history,  and  a  multi-award  winner. 

"Best  Shoot-em-Up 
Arcade  Game" 

—  Family  Computing 

"Best  Action/Arcade 
Game" 

—  Computer  Entertainer 


3.  Dr.  J  and  Larry  Bird 
Go  One-on-Onc™ 
The  number-one  computer  sports 
simulation  of  all  time.  The  players 
look  real,  and  the  sounds  are  so 
detailed  you  can  even  hear  the 
squeaking  sneakers  on  the 
hardwood  floor.  Feels  so  real 
you'll  think  you're  down  on 
the  court  with  these  basketball 
superstars. 

"Game  of  the  Year " 
—  Electronic  Games 


6.  Seven  Cities  of  Gold™ 
Play  the  role  of  Columbus  or  Cortez  in  this  lush 
simulation  and  adventure  game.  Learn  history  and 
geography  as  you  explore  the  New  World  — and 
face  the  problems  of  the  Conquistadors.  Earn 
glory  and  gold,  or  wind  up  beached  by  mutineers. 
If  you  sun,'ive,  the  computer 
will  generate  unlimited  new 
continents  for  you  to  explore. 

"Best  Role-Playing  Adventure" 
—  Family  Computing 


8.  The  Eighth  Reason? 

^  These  Electronic  Arts  products  are 
■  ~^    available  NOW,  so  you  can  stop 
waiting  for  the  high-quaiity 
software  that  will  let  you  get  the 
"^^^^■■^  '^^^■^■i««™«^    most  from  your  Amiga. 

ELECTRONIC  ARTS  TM 


How  to  Order:  Visir  your  tetaikr  or  call  800-245-4525  (in  CA  call  800-562-1112)  for  VISA  or  MasterCard  orders.  Tn  purchase  by  mail,  send  chfck  or  moni^y  order  to  Electronic  Arts. 

no.  Box  7530.  San  Msleo.  CA  94403.  Add  S5  for  shipping  and  handling  Allow  2-4  weeks  for  delivery.  All  of  the  above  Amiga  products  are  $39-95.  except  Financial  Cookbook  at  $49.95  and 

DeluxePainI  at  $99.95.  To  get  a  complete  product  catalog  and  order  form,  send  5CX  ani  a  stamped,  self-addressed  envelope  to  Electronic  Arts  Catalog.  1620  Gateway  Drive.  San  Mateo.  CA  94404. 
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Our  BASIC  Compilers  are 
the  complate  compiler 
and  development  pack- 
ages. Speed  up  your 
programs  from  5x  to  3Sx. 

Our  BASIC  Compiters 
give  you  many  options 
flexible  memory  manage 
ment;  choice  of  compiling 
to  machine  code,  com- 
pact p-code  or  a  mixture 
ofbolh.  Alsoon  the*12e, 
40  or  80  column  monitor 
output  and  FAST-mode 
operation. 


Mate  joar  BASICprcircml  rw.  UGHmiNG  SPEED! 


The  '128  Compiler's  extensive  80-page  programmer's  guide  covers  compiler 
directives  and  options,  two  levels  of  optimization,  memory  usage, 
inpul^output  handling,  80  column  hi-res  graphics,  faster,  higher  precision 
math  functions,  speed  and  space  saving  tips,  more.  A  great  package  that  no 
software  libraiy  should  be  without.  BASIC  128  Compiler  $59.95 

BASIC  64  Compiler    $39.95 


For  school  or  software 
development,  select  SUPER 
C.  Learn  to  use  C  on  your 
Commodore  with  our  in- 
depth  tutorial.  Compile  your 
C  programs  into  fast  machine 
language.  C-128  version  has 
added  features:  Unix"'-like 
operating  system;  60K  RMA 
disk  tor  fast  editing  and 
compiling  and  is  usable  in 
your  C  programs:  Use  up  to  7 
disk  drives;  Linker  combines 
up  to  10  modules;  Combine  MIL  and  C  using  CALL;  Up  to  51 K  available 
for  object  code;  Fast  loading  {8  sec.  1571,  IS  sec.  1541);  Two  standard 
I/O  librarys  plus  two  additional  libraries— math  functions  (sin,  cos.  sqrl, 
etc.)  &  20+  graphic  commands  (line,  fill,  dot,  etc.).  C-128     $79.95 

C-64  $79.95 
For  the  professional  who 
wants  to  easily  create  high 
quality  charts  and  graphs 
without  programming.  You 
can  immediately  change  the 
scaling,  labeling,  axis,  bar- 
filling,  etc.  to  suit  your  needs. 
Accepts  data  from  CalcResult 
and  N/lulliPlan.  C.128  version 
has  3X  the  resolution  of  the 
'64  version.  Outputs  to  most 
printers.  C-128  $39.95 
C-E4      $39.95 


1    JbHARTPAK 


PowerPlan 

One  of  the  most  powerful  spreadsheets  with  integrated  graphics 
for  your  Commodore  computer.  Includes  menu  or  keyword 
selections,  online  help  screens,  field  protection,  windowing,  trig 
functions  and  more.  Power-Graph,  the  graphics  package.  Is 
included  to  create  integrated  graphs  &  charts.       C-64  $39.95 


Using  GADPAKs  new 
dimensioning  features 
you  can  create  exact 
scaled  output  to  all  major 
dot-matrix  printers. 


1       ti-  N  [^  H 
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CADPAK  allows  you  to 
input  via  the  keyboard  or 
a  high  quality  lightpen. 
Two  graphic  screens  per- 
mit you  to  COPY  from  one  screen  to  another.  DRAW,  LINE,  BOX,  CIRCLE, 
ARC,  ELLIPSE  are  but  a  few  of  the  many  selections  to  choose  from.  FILL 
objects  with  preselected  PATTERNS;  add  TEXT;  SAVE  and  RECALL  designs 
to/from  disk.  You  can  define  your  own  library  of  intricate  symbols/objects  with 
the  easy-to-use  OBJECT  fvlANAGEMEl^  SYSTEful-it  will  store  up  to  104 
separate  objects.  C-1 28  $59.95 

C-64    $39.95 


CADPAK  is  a  remarkably 
easy  to  use  drawing 
package  for  accurate 
graphic  designs. 


Compiler  and  Software 
DcvcIopmEnl  System 
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Not  just  a  compiler,  but  a 
complete  system  for  develop- 
ing applications  in  Pascal, 
Extensive  editor  with  search, 
replace,  auto,  renumber,  etc. 
Slandard  J  &  W  compiler  that 
generates  fast  machine  code. 
If  you  want  to  fearn  Pascal  or 
to  develop  software  using  the 
best  tools  available-SUPEB 
Pascal  is  your  first  choice. 
C-128  $59.95 
C-64      $59.95 


OTHER  TITLES  AVAILABLE: 

Technical  Analysis  System 

A  sophisticated  charting  and  technical  analysis  system  for 
serious  investors.  By  charting  and  analyzing  the  past  history  of  a 
stock,  TAS  can  help  pinpoint  trends  &  patterns  and  predict  a 
stock's  future.  Enter  data  from  the  keyboard  or  from  online 
financial  services.  C-64  $59.95 

Personal  Portfolio  Manager 

Complete  portfolio  management  system  for  the  individual  or 
professional  Investor.  Easily  manage  your  portfolios,  obtain 
up-to-the  minute  quotes  and  news,  and  perform  selected 
analysis.  Enter  quotes  manually  or  automatically  through 
Warner  Computer  Systems.  C-64  $39.95 

Xper 

XPER  is  the  first  "expert  system"  for  the  C-1 28  and  C-64.  While 
ordinary  data  base  systems  are  good  for  reproducing  facts, 
XPER  can  derive  knowledge  from  a  mountain  of  facts  and  help 
you  make  expert  decisions.  Large  capacity.  Complete  with 
editing  and  reporting.  C-64  $59.95 

C-ia  Bid  frM  ■•  »«lt«iiirtB  «« Commodof  •  Bu*n»M  kUthlnw  bit 
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P.O.  Box  721 9  Grand  Rapids,  Ml  4951 0  ■  Telex  709-1 01  ■  Phone  (61 6)  241  -551 0 

Call  now  for  the  name  of  your  nearest  dealer.  Or  to  order  directly  by  credit  card,  MC,  AMEX  of  VISA  call  (616) 
241-5510.  Other  software  and  bool<s  are  available-Call  and  ask  for  your  free  catalog.  Add  $4,00  for  shipping 
per  order.  Foreign  orders  add  $12.00  per  item.  Dealer  inquires  welcome-1 400-1-  nationwide. 
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Delailed  guids  presents  Ihe  ISS's 
operating  systdrrt,  explains  grapttlc 
chips,  Memory  Manageinent  Unit,  80 
column  graphics  and  cpmmshtsd 
ROMSsiings.  SOOpp  S19.9S 


Qet  all  th<  InsM*  Inlormitlon  on 
BASIC  7.0.  This  sxhauitive  hind- 
IM^  Is  conipl«t»  with  commantid 
BASIC  7.0  ROM  llatlnga.  Coming 
Summ»f'8e.  J19.8S 


Fllltd  with  hlotortvuyeit*.  Cavtra  i 
ao  column  hl-rai  grapltlci,  win- 
dowing,  mtmoty   liyoul,   KorntI 
rouilnti,   ipritti,  loltwart  pro- 
taction,  tutoitanlng.   aoopp  StSSS 


Inalders'  guld«  tor  novice  i  ad- 
vincad  users.  Covers  sequential  & 
relative  lllaB,  &  direct  access  com- 
minds.  Describes  DOS  routines. 
Commented  I'stingi.  4S0pp  $19.95 


Learn  tundamsnials  ot  CAD  while 
developing  your  own  systertt.  Desigtt 
objects  on  your  screen  to  dump  to  a 
printer.  Includes  listings  for  '64  with 
Sinnon's  Basla  SOOpp  $19.95 
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BASIC  Training 
Guide 


Qtd  'nin  'rrmaiD 
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.S..IV.V., 


PEEKS  &  POKES 


r^cn  !\nS.^<lD  IT* 


Ahj'^U^^^^HoUMATi- 


InifOcJuclion  to  programing;  problem 
analysis;  thorough  description  of  all 
BASIC  rammands  with  hundreds  ot 
examples;  moniior  commands;  u!il* 
Hies;  much  more.  200pp  $19. SS 


Presents  doiens  ol  programming 
quick-hitters.  Easy  and  usetul 
techniques  on  the  operating  system. 
Slacks,  zero-page,  pointers,  the 
BASIC  ini&rprBler  and  mcxe-    §19.95 


Essential  guide  tor  everyone  Inter- 
ested In  CP/M  on  the  128.  Sifnpi« 
explanation  of  thd  operating  system, 
memory  usage,  CP/M  utility  pro- 
grams, submit  liies  i  more.      £1 9.95 


ANATOMY  OF  C-W  InsSdsfs  guide  to  lh« 
"64  internals.  Graphica,  sound,  VO,  Jtarnal, 
memory  m^ipa,  mora. Complete  commented 
ROM  livings.  SOOpp  $19.95 


ANATOMY     OF 

handbook  on  llO{ 


154^  ,  DRIVE    Beel 
all.  Many 


examples  and  {WMleSk^^GW  commented 
1541  R0Mlisiina8.>'-^  *"^         SOOpp    S19.95 

MACHINE  LANGUAGE  C-64  Learn 
6510  CDdfi  write  fast  programs.  Many  sam- 
ples and  listings  lor  complete  assembler, 
monitor,  &  simulator,  ZOOpp    S14.95 

GRAPHICS  BOOK  C-64  -  best  reference 
covers  basic  and  advanced  graphics. 
Sprites,  animation.  Hires,  Muflltolof, 
liflhtpen.  3D-graphica,  IflQ,  CAD,  pro- 
jectbrs,  curves,  more.  350pp    S1 9.95 


TRICKS  ft  TIPS  FOR  C-64  CollftCtlon  of 
easy-to-use  techniques:  a(tvar*ce<J  graphics. 
Improved  data  Input,  enhanced  BASIC, 
CP/M,  more.  275  pp'  51 9.95 

1541  REPAIR  &  MAINTENANCE 
Handbook  describes  the  disk  drive  hard' 
ware.  Includes  schematics  and  techniques 
to  keep  1541  funning.  200pp    $19.95 

ADVANCED  MACHINE  LANGUAGE 
Not  covered  elsewhere:  -  video  oonlrolier. 
interrupts,  timers,  clodis,  I/O,  reaJ  lime, 
extended  BASIC,  more.         210pp    S14.95 

PRINTER  BOOK  C-e4/VIC-20  Under- 
stand  Commodore,  Epson-compatiblo  print- 
ers and  1520  piotter.  Packed:  utiHIies;  gra- 
phics dump;  3D-plol;  commented  MP$a01 
ROM  ltstlng».  more.  330p|i  $16.9S 


SCIENCE/ENQINEERINQ  ON  0-64  In 
depth  intfo  to  oomputen  In  sderce.  Topics; 
chemistry,  physlci,  biology,  astronomy, 
electronics, others.  3S0pp  $19-95 

CASSETTE  BOOK  C'S4/VIC-S0 
Comprehensive  guide;  many  sample 
programs.  High  speed  operating  system 
last  file  loadingi  and  saving.  22Spp  $14.95 
IDEAS  FOR  USE  ON  C-64  Themes: 
auto  expenses,  calculator,  redpe  file,  stock 
lists,  diet  planner,  window  advenislng, 
others.  Indudes  listings.  200pp  $12.95 

COMPILER  BOOK  C-64/C-128  All  you 
need  to  know  about  compilers:  how  they 
work;  designing  and  writing  your  own; 
generating  rnachine  code.  With  working 
example  compiler.  300pp  $19.95 


Advtntur*  Qimewrlter'a  Hindbook 

Step'by'Siep  guide  to  designing  &nd  writlrvg 
your  own  adventure  games,  With  automated 
adventure  game  generator.  200pp    $14.95 

PEEKS  &  POKES  FOR  THE  C-64 
Includes  in-deplh  explanations  ol  PEEK, 
POKE,  USR,  and  other  BASIC  commands. 
Learn  the  'inside'  tricks  to  get  the  most  out 
of  your '&4.  2O0pp  $14.95 

Opllpnal  DIekelles  for  booke 
For  your  convenience,  the  programs 
contained  \n  each  of  our  books  are  avail- 
able on  diskette  to  save  you  time  enterrng 
them  from  your  keyboard.  Specify  name  of 
book  when  ordering.  $14.93  cfech 


Abacus  iMinil  Software 


C'^  2&  amd  C-64  ire  lred«fnufcs  ol  Conmoto*  Buitnm  MecMnvi  IncL 


P.O.  Box  7219  Grand  Rapids,  Ml  49510  -Telex 709-1 01  ■  Plione  (616)  241-5510 

Call  now  for  the  name  of  your  nearest  dealer.  Or  to  order  directly  by  credit  card,  MC,  AMEX  of  VISA  call  (616) 
241-5510.  Other  software  and  books  are  available-Call  and  ask  for  your  free  catalog.  Add  $4.00  for  shipping 
per  order.  Foreign  orders  add  $10.00  per  book.  Dealer  inquires  welcome-1400+  nationwide. 
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The  Graphics  Expander'"  has  over  300  outstanding 
new  graphics  that  add  dazzle  and  flair  to  your  Print 
Shop"  creations. 


The  Graphics  Expander '  °  has  powerful  drawing  and 
editing  tools  to  easily  modify  and  customize  any 
graphic. 


Now  you  can  actually  combine  graphics  for  cards, 
banners  and  signs  that  no  one  can  match.  That's 
being  creative! 


If  you  use  The  Print  Shop,"'  you  need  the 
Graphics  Expander"'  Volume  1. 

You  get  over  300  new,  useful  graphics  which 
can  be  combined  and  arranged  as  you  wish  and 
then  brought  into  The  Print  Shop.  Make  your  work 
come  alive  with  a  variety  of  impressive,  realistic  art 
or  select  from  delightful,  cartoon-like  characters. 
There's  so  much  to  choose  from  with  the 
Graphics  Expander. 

Use  these  graphics  exactly  as  they  appear 
to  give  your  Print  Shop  creations  a 
refreshing,  unique  look.  Or,  have  fun 
customizing  the  graphics  to  make  each  one 
perfect  for  the  occasion.  With  the 
Graphics  Expander  you  can  easily  add  a 
specific  number  of  candles  to  a  birthday 
cake  or  put  the  coach's  name  right  on  a 
footbaO. 

It's  easy  because  the  Graphics 
Expander  provide  s  powerful 
drawing  and  editing  tools 


that  work  just  as  well  with  graphics  from 
The  Print  Shop  or  The  Print  Shop  Grapliics 
Library.'"  You  can  select  from  a  variety  of 
drawing  pens,  fill  patterns,  automatic  lines, 
circles  or  boxes.  Flip  graphics  left  to  right  or  magnify  them 
for  detail  work.  The  tools  are  fim  to  use  and  make  it  easy  to 
personalize  your  Print  Shop  creations. 

Futhermore,  the  Graphics  Expander  allows  you  to  make 
Print  Shop  graphics  out  of  your  favorite  computer  pictures 
from  any  source  such  as  a  Koala  Pad  "'^ 
or  digitizer.  Any  portion  of  a 
standard  high  resolution 
picture  can  now  be  part  of 
your  banners,  signs  and 
greeting  cards. 

With  The  Graphics  Expander  Volume  1, 
not  only  do  you  have  access  to  over  300 
wondeitil  new  graphics,  but  with  the 

f      drawing  and  editing  tools,  you  -O^ft^" 
have  access  to  your  .Qiq^^^ 

imagination.  Picture  that!         ^^^^^ 


SPRINGBOARD 


Springboard  Software  ■  7808  Creekiidge  Circle  •  Minneapolis,  •  55435  ■  (612)  944-3915. 

AvjilaHe  for  the  Apple  [1  ^,  lie,  lie.  IBM  andCffiiraiodore  versbas  are  coming  soon. 

The  I'rait  Shop  jnd  The  Print  Shop  Graphics  LDrarj- ire  trademarfesrfBroderiuml  Software,  Inc. 

Koala  Pad  is  a  trademarli  oi  Keaia  Technologies  Coip- 


COMPUIG 


MAY  1986 
VOLUME  8 
NUMBER  5 
ISSUE  72 


FEATURES 


18   The  Digital  Window:  Graphics  Today  and  Tomorrow Kathy  Yakal 

24   Creating  with  CAD:  Computer-Alded  Design Selby  Boteman 

36   Hickory,  DIckory,  Dock Barbara  H.  Schulak 


GUIDE  TO  ARTICLES 
AND  PROGRAMS 


64/128/AT/AP/ST/ 
AM/PC/PCjr 


REVIEWS 


48    Philips  CD-ROM  and  The  Electronic  Encyclopedia  for  IBM   Tony  Roberts 

52    The  Body  in  Focus    Larry  Krengel 

52   One-on-One  for  Amiga Charles  Brannon 

56  AtahWriter  Plus Tom  R.  Halfhill 

60  Borrowed  Time   Selby  Bateman 

61  Europe  Ablaze  for  Commodore  and  Apple Neil  Randall 

62  Ultima  IV:  Quest  for  the  Avatar  for  Apple  and  64    James  V.  Trunzo 


PC 

64/AP/PC/PCjr 

AM 

AT 

64/128/AP/PC/PCjr/ 

AM/ST/Mdc 

64/128/AP 

64/128/AP 


COLUMNS  AND  DEPARTMENTS 

6  The  Editor's  Notes Richard  Mansfield 

10  Readers'  Feedback   The  Editors  and  Readers  of  COMPUTE! 

95  INSIGHT:  ST— Exploring  the  ST    Bill  Wilkinson 

96  AmigaView:  New  Amiga  Software    Charles  Brannon 

97  Telecomputing  Today:  Online  Etiquette Arlan  R.  Levltan 

98  The  World  Inside  the  Computer:  Training  for  Tomorrow's  Jobs Fred  D'IgnazIo 

99  Computers  and  Society:  Computer  Ethics   David  D.  Thornburg 

100  The  Beginner's  Page:  String  Comparisons .    Tom  R.  Halfhill 

101  INSIGHT:  Atari— Avoiding  Disk  Errors Bill  Wilkinson 

102  Programming  the  Tl:  Animation  in  Tl  BASIC C.  Regena 

104  IBM  Personal  Computing:  The  PC/VCR  Connection Donald  B.  Trivette 

127  HOTWARE    


ST 
AM 


AT 

Tl 

PC/PCjr 


THE  JOURNAL 


65   Adding  System  Power  to  ST  BASIC,  Part  2 Kevin  Mykytyn 

68    Using  PALETTE  USING  on  the  PCjr John  and  Jeff  Klein 

72  Applesoft  List  Enhancer  Steven  Roth 

73  Loading  and  Linking  Commodore  Programs,  Port  3     Jim  Butterfield 

75   Better  Branching  in  Applesoft   Mark  Russinovich 

77   Random  Numbers  in  Machine  Language  for  Commodore  64    Neil  Boyle 

79   Amiga  Puzzle    Bill  Boegelein 

81    DEBUT:  Atari  BASIC  Debugging  Tool    Gary  W.  Swanberg 

86   MODifled  Shapes  for  IBM   Paul  W.  Carlson 

88   Custom  Characters  for  Atari  SpeedScript    Charles  Brannon 

90   64  Autobooter Terry  Roper 

93    Upgrading  the  Apple  ESCape  Key   Robert  Jacques  Beck 

1 1 2   Managing  Files  from  Atari  ST  BASIC    William  Sanders 

117    BASIC  Equivalents  in  C Harley  M.  Templeton 

105  CAPUTEI  Modifications  or  Corrections  to  Previous  Articles 

106  COMPUTEi's  Autlior  Guide 
108  COMPUTEi's  Guide  to  Typing  In  Programs 
1 20  News  &  Products 
1 28  Advertisers  index 

TOLL  FREE  Subscription  Order  Line 
800-247-5470  (In  lA  800-532-1272) 


NOTE:  See  page  1 08 
before  typing  In 
programs. 


ST 
PCjr 

AP 

64/128/VIC/+4/16 

AP 

64/128 

AM 

AT 

PC/PCjr 

AT 

64 

AP 

ST 


AP  ^4>pie.  Mac  Macinfosh.  AT 
Atari.  ST,  Atari  ST,  V  VIC-20.  M 
Commodor©  64.  4-4  Comrnodore 
Piui/i.  14  Commodofe  16.  12S 
Commodore  123.  f  PET/CBM,  Tl 
Texas  Instrnmenls,  PC  IBM  PC.  PCjr 
IBM  PCjr.  AM  Amiga.  'Generol 
Interest. 


COMPUTE!  Publicationsjnc.® 

Part  ol  ABC  Consumer  Magcnlnat,  Inc.  ^^ 

One  of  fhe  ABC  Publlthlng  Companlfts 

ABC  Publishing,  President.  Robert  G,  Burton 

1330  Avenue  of  tfie  Americas,  New  Yori<,  New  Yori<  10019 


COMPUTEI  The  Journal  for  Progressive  Computing  (USPS:  537250)  is  published  monthly  by 
COMPUTE!  Publications,  Inc.,  825  7th  Ave.,  New  Yo*,  NY  10019  USA.  Phone:  (212)  265-8360. 
Editorial  Offices  are  located  at  324  West  Wendover  Avenue,  Greensboro,  NC  27408.  Domestic 
Subscriptions:  12  issues,  S24.  POSTMASTER;  Send  address  changes  to:  COMPUTEI  Magazine,  P.O. 
Box  10^55,  Des  Moines,  lA  50950.  Second  class  postage  paid  at  Greensboro,  NC  27403  and  addi- 
tional mailine  offices.  Entire  contents  copyright  ©1936  by  COMPUTE!  Publications,  Inc.  All  rights 
reserved,  ISSN  01 94-33  7X. 


Editor's  Notes 


A  recent  book,  Alan  Turing:  The  Enigma, 
is  a  fascinating  study  of  the  life  of  a 
brilliant  scientist  and  of  the  develop- 
ment of  early  "computing  engines" 
which  helped  decode  secret  German 
messages  and  significantly  contributed 
to  the  Allied  victory  in  World  War  U. 
Turing  worked  with  primitive  de- 
coders. Called  Bombes  because  they 
ticked  loudly,  they  were  something  like 
old-style  adding  machines,  computing 
with  gears  and  wheels — all  mechanical 
in  the  days  before  the  electronic  revolu- 
tion. In  fact,  much  of  the  computation 
was  done  by  hundreds  of  women  on  an 
assembly  line; 

...the  Bombes  ticked  away,  get- 
ting on  with  ttie  work... while  the 
Wrens  [Women's  Royal  Naval  Ser- 
vice] did  their  appointed  tasks,  with- 
out knowing  what  any  of  it  was  for. 
He  [Turing]  was  fascinated  by  the  fact 
that  people  could  be  taking  part  in 
something  clever,  in  a  quite  mindless 
way. 

Machines,  and  people  acting  like 
machines,  had  replaced  a  good  deal 
of  human  thought,  judgment,  and 
recognition.  Few  knew  how  the  sys- 
tem worked,  and  for  anyone  else,  it 
was  a  mystic  oracle,  producing  an 
unpredictable  judgment.  Mechanical, 
determinate  processes  were  produc- 
ing clever,  astonishing  decisions. 

Indeed,  this  large  room  of  workers 
surrounding  the  Bombe  suggested 
nothing  to  Turing  so  much  as  a  giant 
machine.  Here  a  group  was  mechani- 
cally adding  results;  over  there  was  an- 
other crew  responsible  for  feeding 
information  back  into  the  Bombe.  Some 
people  had  to  file  information,  some 
had  to  compare  a  template  against  each 
new  pattern  as  it  was  passed  down  the 
line.  We  can  now  easily  recognize  that 
these  activities  are  the  elements  of  com- 
puters and  software:  RAM,  ROM, 
masking,  CPU,  feedback  loops,  branch- 
ing, and  so  forth.  In  those  days,  howev- 
er, it  took  genius  to  see  that  the  Bombe 
could  be  expanded  to  take  over  and 
speed  up  the  functions  of  the  hundreds 
of  clerks  working  around  it. 

U-boats  were  sinking  ships  all  over 
the  Atlantic.  Turing  and  his  associates 
were  always  working  against  time,  try- 
ing to  decode  messages  faster.  Eventu- 
ally, they  began  to  experiment  with 
ways  to  store  information  electronical- 


ly. It's  intriguing  to  read  of  their  efforts 
to  hold  onto  a  few  bits  of  information 
for  a  brief  time.  One  of  the  best  solu- 
tions they  came  up  with  was  to  store 
the  bits  in  a  cathode  ray  tube,  an  early 
TV  screen.  This  had  the  advantage  that 
you  could  amuse  yourself  by  watching 
the  bits  flickering  while  they  briefly 
rested  until  needed  again  by  the  central 
processor. 

But  Turing's  most  famous  contri- 
bution to  computing  is  the  related  con- 
cepts we  now  call  the  Turing  niachine 
and  the  Turing  test.  His  idea  of  the 
machine  revealed  that  he  achieved  the 
first  comprehensive  understanding  of 
the  possibility  of  artificial  intelligence. 
He  imagines  a  universal  machine,  one 
that  could  perform  the  job  of  all  the 
other,  more  specialized,  machines. 
Adding  machines  operated  according  to 
fixed  rules  which  were  reflected  in  their 
metal  cogs  and  gears.  The  Bombe,  too, 
performed  its  job  because  its  mecha- 
nism was  physically  shaped  in  certain 
ways. 

Turing  thought  of  "tapes"  which 
could  contain  instructions  describing 
the  "state  of  mind"  of  the  adding  ma- 
chine, the  bombe,  or  any  other  calculat- 
ing engine  including  human  "com- 
puters." A  tape  could  be  fed  into  a 
supermachine,  and  it  would  then  adapt 
to  the  state  of  mind,  the  description  of 
some  other  machine,  contained  on  the 
tape.  In  this  way,  the  supermachine 
could  "perform  the  equivalent  of  hu- 
man mental  activity.  A  single  machine 
to  replace  the  human  computer!  An 
electric  brain!" 

By  the  1950s,  Turing  had  com- 
pletely formulated  another  startling 
concept:  How  can  you  tell  if  a  machine 
is  truly  thinking?  The  Turing  test  is  de- 
ceptively simple:  If  a  questioner  cannot 
tell  the  difference  between  written  an- 
swers from  two  intelligences,  then,  for 
any  practical  purpose  there  is  no  differ- 
ence between  the  intelligences. 

He  imagined  a  game  in  which  an 
interrogator  would  have  to  decide,  on 
the  basis  of  written  replies  alone, 
which  of  two  people  in  another  room 
was  a  man  and  which  a  woman.... 
They  would  alike  be  making  claims 
such  as  "I  am  the  woman,  don't  listen 
to  him!"....  A  successful  imitation  of  a 
woman's  responses  by  a  man  would 


not  prove  anything.  Gender  depend- 
ed on  facts  which  were  not  reducible 
to  sequences  of  symbols.  In  contrast, 
he  wished  to  argue  that  such  an  imita- 
tion principle  did  apply  to  "thinking" 
or  "intelligence."  If  a  computer,  on 
the  basis  of  its  written  replies  to  ques- 
tions, could  not  be  distinguished  from 
a  human  respondent,  then  "fair  play" 
would  oblige  one  to  say  that  it  must 
be  "thinking." 

...he  produced  an  argument  in 
favor  of  adopting  the  imitation  princi- 
ple as  a  criterion.  This  was  that  there 
was  no  way  of  telling  that  other  peo- 
ple were  "thinking"  or  "conscious" 
except  by  a  process  of  comparison 
with  oneself,  and  he  saw  no  reason  to 
treat  computers  any  differently. 

Turing  expected  a  machine  to  pass 
his  test  around  the  end  of  this  century; 

I  believe  that  in  about  fifty  years' 
time  it  will  be  possible  to  programme 
computers,  with  a  storage  capacity  of 
about  10',  to  make  them  play  the 
imitation  game  so  well  that  an  aver- 
age interrogator  will  not  have  more 
than  70  per  cent  chance  of  making  the 
right  identification  after  five  minutes 
of  questioning.  The  original  question, 
"can  machines  think?"  I  believe  to  be 
too  meaningless  to  deserve  discus- 
sion. Nevertheless  I  believe  that  at 
the  end  of  the  century  the  use  of 
words  and  general  educated  opinion 
will  have  altered  so  much  that  one 
will  be  able  to  speak  of  machines 
thinking  without  expecting  to  be 
contradicted. 

Ten  to  the  ninth  power  is  122,070K 
or  119  megabytes.  (Turing's  10'  repre- 
sents bits).  One  hundred  and  nineteen 
megabytes  is  not  an  uncommon  storage 
capacity  nowadays — we've  got  more 
than  that  here  at  COMPUTE!  in  the  hard 
disks  servicing  our  minicomputer  edit- 
ing system.  Yet  our  system  would  never 
pass  the  Turing  test. 

Nonetheless,  Turing's  machine, 
his  test,  and  his  other  ideas  continue  to 
have  enormous  impact,  and  Alan  Tu- 
ring: The  Enigma  is  a  lively,  understand- 
able portrait  of  a  major  thinker's  life 
and  ideas.  If  you're  curious  about 
where  computers  came  from  and  where 
they're  likely  to  go  from  here,  you'll 
enjoy  this  book  very  much  indeed. 

Senior  Editor 
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Flight  Simulator  II 

Scenery  Disks 

The  Challenge  of  Accomplished  Flight 

Wuh  a  realism  comparable  to  (nnd  in  some  ways  even  surpassing) 
$100,000  aircraft  flight  simulators.  Flight  Simulator  II  includes  full 
flight  instrumentation  and  avionics,  and  provides  a  full-color  out-the- 
window  view.  Instruments  are  arranged  in  the  format  standard  to 
modern  aircraft.  All  the  radios  needed  for  IFR  flight  are  included. 
Front,  rear,  left,  right,  and  diagonal  views  let  you  look  in  any  direction. 
Program  features  are  clearly  documented  in  a  96-page  Pilot's  Operat- 
ing Handbook. 

For  training  in  proper  flight  techniques.  Flight  Simulator  II  includes 
another  96-pago  instruction  manual,  compiled  by  two  professional 
flight  instructors  with  over  8.000  hours  flight  time  and  1 2.000  hours 
of  aviation  teaching  experience.  You'll  learn  correct  FAA- 
recommended  flight  procedures,  from  basic  aircraft  control  through 
instrument  approaches.  To  reward  your  accomplishments,  the 
manual  even  includes  a  section  on  acrobatic  maneuvers. 


The  Realism  and  Beauty  of  Flight 

Go  sight-seeing  over  detailed,  realistic  United  States 
scenery.  High-speed  graphic  drivers  provide  an 
animated  out-the-window  view  in  either  day,  dusk,  or 
night  flying  modes. 

Flight  Simulator  II  features  over  80  airports  in  four 
different  scenery  areas:  New  York.  Chicago.  Seattle. 
and  Los  Angeles.  Six  additional  Scenery  Disks  covering 
the  entire  Western  half  of  the  United  States  are  now 
available  in  IBM  and  C64/I28  disk  formats. 
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Apple  and  Atari  versions  will  be  released  soon.  Each  disk  covers  a 
geographical  region  of  the  country  in  detail,  and  is  very  reasonably 
priced. 

The  Pure  Fun  of  "World  War  I  Ace" 

When  you  think  you're  ready,  you  can  test  your  flying  skills  with  the 
"World  War  I  Ace"  .icrj.il  battle  game.  This  game  sends  you  on  a 
bombing  run  over  he.avily-defendcd  enemy  territory.  Six  enemy 
fighters  will  attempt  to  engage  you  in  combat  as  soon  as  war  is 
declared.  Your  aircraft  can  carry  five  bombs,  and  your  machine  guns 
are  loaded  with  100  rounds  of  ammunition. 

See  Your  Dealer.  Flight  Simulator  II  is  available  on  disk  for  the 
Apple  II.  Atari  XLXE,  and  Commodore  64/128  computers  for 
$49.95.  Scenery  Disks  for  the  C64  and  IBM  PC  (Jet  or  Microsoft 
Flight  Simulator)  are  $  1 9.9S  each.  A  complete  Western  U.S.  Scenery 
six-disk  set  is  also  available  for  $99.95.  For  additional  product  or 
ordering  information,  call  (800)  637-4983. 

Apple  II  ti  ,1  trademafk  of  Apfilc  Compyter.  inc. 

A«ri  XL  .ind  XE  .ire  irademarki  oi  Auri  Corp, 

Conimoilore  H  and  1 29  are  irademarks  of  Commodore  Electronics  Lid, 

1BM  PC  li  1  registered  trademark  of  Iniernanonal  Business  Machines  Corp. 
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PPLE  INFORMATION 


Take  advantage  of  the  spectacular  special  features  of  your  Apple  ll-series 
intosh  computers  with  these  bestsellers  from  COMPUTE!  Books. 


Advanced  Macintosh 
BASIC  Programmtng 

rtilip  Calippe,  309  pages 
A  reference  guide  and  tutorial  to 
Microsoft  BASiC  which  shows  you 
how  to  use  the  Macintosh's  ad- 
vanced features  to  create  impres- 
sive programs.  A  disk  is  also 
available  which  includes  programs 
in  the  book,  $15.95  I0300BDSKI. 

S 1 6.95     ISBN  Ch«7455-03O-0 


Banning  Microsoft 
BASIC  and 
Applications 


Using  Your  Macintosh: 
Beginning  Microsoft 
BASIC  and  Applications 

Richard  K.  Swadley  and  loseph 
Boyie  Wlkert,  274  pages 
Necessary  and  easy-to-understand 
information  about  the  revolu- 
tionary Macintosh  along  with  clear, 
easy-to-follow  explanations  of 
BASIC.  Everything  from  writing 
your  first  statement  to  creating  a 
finished  program.  A  disk  is  also 
available  which  includes  programs 
in  the  book,  $15.95  I02IIBDSK). 

$16.95     ISBN  («7455-02 1  - 1 


APPLE  II  _ 
APPLlCATiONS 


Apple  [I  Applications: 
Forty  Programs  for 
Your  Apple 

Brian  Flynn  and 
Christopher  Flynn,  374  pages 
Forty  educational  and  strategy 
games,  business  and  science 
applications,  and  home  and  per- 
sonal organizational  tools  to  use 
on  any  Apple  ll-series  computer,  A 
disk  package  is  also  available 
which  includes  programs  in  the 
book,  specify  DOS  3.3  or  ProDOS, 
$12,95 

$14.95     ISBN  0-87455-016-5 
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Macldeas 

I.  Richard  McLaughlin,  240  pages 
More  than  100  ways  to  utlliie  the 
Macintosh's  powerful  graphics 
capabilities.  Beautify  everything 
from  personal  gifts  to  correspon- 
dence, and  learn  how  to  use  digi- 
tizers to  create  dazzling  graphics. 

S 1 4.95     ISBN  0-87455-01 5-7 
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(0300BDSK).  SI 5.95  each 

Apple  IE  Applications  (016-5),  Si4,95  each  

Apple  it  Applications  Disk.  DOS  J.3  (0I65DSKI),  

SI 2.95  each 
Apple  11  Applications  Disk,  ProOOS  (0I65DSK2],  

12.95  each 
Apple  il  Applications  Book  and  DOS  3.J  Dlslc       

Combination  package  (050-5),  $29.95  each 
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Readers  Feedback 


rhe  Editors  and  Readers  of  COMPUTE! 


If  tfou  have  any  tjucstions,  comments,  or 
suggestions  you  would  like  to  see  ad- 
dressed in  this  column,  write  to  "Readers' 
Feedback,"  COMPUTE!,  P.O.  Box  5406, 
Greensboro,  NC  27403.  Due  to  the  volume 
of  mail  we  receive,  we  regret  that  ive 
cannot  provide  personal  answers  to  tech- 
nical (juesfions. 


Unique  Random  Numbers 

I  am  writing  a  program  that  requires 
random  numbers  to  control  the  game, 
but  the  problem  is  I  want  to  filter  out 
the  random  numbers  that  have  already 
been  picked.  I'm  using  an  Atari  com- 
puter. What's  the  solution? 

Daren  O'Brien 

There  are  a  couple  of  solutions  to  this 
problem,  and  they  apply  to  nearly  any 
version  of  BASIC.  Which  method  is  fastest 
and  most  efficient  depends  on  the  particu- 
lar requirements  of  your  program.  You 
may  be  writing  an  arcade-style  game 
which  needs  to  position  characters  or  ob- 
jects randomly  about  the  screen,  each  in  a 
different  location;  or  you  may  be  writing  a 
card  game  simulation  that  requires  a 
"shuffled"  pile  of  52  random  numbers. 

The  most  common  approach  is  to 
generate  a  random  number,  check  it 
against  a  list  of  previously  generated  ran- 
dom numbers  stored  in  an  array,  and  then 
generate  a  neiu  number  if  there's  a  match. 
This  can  be  done  by  a  subroutine  that  your 
program  calls  whenever  it  needs  a  unique 
number.  Here's  an  example  in  Atari 
BASIC  that  works  with  little  or  no  modifi- 
cation in  most  other  BASICs: 

10  SIZE-100:DIM  ARRAY(SIZ 

E) : A=l 
20  FOR  J=l  TO  SlZEiARRfiY( 

J)=0sNEXT  J 
30  GOSUB  1000: REM  GET  UNI 

QUE  RANDOM  NUMBER 
40  PRINT  "UNIQUE  VALUE  «" 

;A-1;"  «  ";RNUM 
50  IF  AOIZE+1  THEN  30 
60  END 
1000  RNUM=INT (RND ( 1 > tl000 

+  1) 
1010  PRINT  RNUM 
1020  J=l 
1030  IF  RNUM=ARRAY( J)  THE 

N  1000 
1040  J»J+1:IF  J<SIZE+1  TH 

EN  1030 
1050  ARRAY (A) "RNUMs A»A+1: 
RETURN 


Line  10  defines  the  size  of  the  array 
which  stores  the  ratidom  numbers  and  sets 
A  =  l  as  an  index  into  the  array.  You  can 
change  the  variable  SIZE,  of  course,  to 
create  any  size  array  you  need.  Line  20 
clears  out  the  array  with  zeroes.  The  state- 
ments in  these  two  lines  should  be  placed 
in  the  initialization  section  of  your  pro- 
gram, followed  by  your  own  code. 

Line  30  calls  the  random  number 
subroutine,  which  begins  at  line  1000.  The 
statement  in  line  1000 generates  a  random 
number  (RNUM)  between  1  and  1000  in 
Atari  BASIC.  Make  whatever  changes  are 
appropriate  for  your  particular  program 
or  version  of  BASIC.  Line  1010  can  be 
omitted  in  your  own  program — if  simply 
prints  the  newly  generated  random  num- 
ber on  the  screen  for  this  demonstration. 
Lilies  1020-1040  set  up  a  loop  which 
compares  RNUM  to  each  element  in  the 
array.  If  a  match  is  found — meaning  the 
random  number  was  previously  generated 
and  stored  in  the  array — the  program  goes 
back  to  line  1000,  which  makes  a  new 
random  number  and  repeats  the  process. 
If  no  match  is  found  anywhere  in  the 
array — meaning  the  random  number  is 
unique — the  program  continues  to  line 
1050.  This  line  adds  the  number  to  the 
array,  increments  the  array  index 
(A=A-^1),  and  finally  ends  the  subrou- 
tine with  a  RETURN. 

(Incidentally,  some  of  you  may  be 
ivondering  why  we  didn't  use  a  FOR- 
NEXT  statement  for  the  loop  in  lines 
1020-1040.  We  didn't  because  the  IF- 
THEN  statement  in  line  1030  frequently 
jumps  out  of  the  loop  back  to  line  WOO 
whenever  it  finds  a  match,  and  this  could 
eventually  cause  a  stack  overflow  and 
out-of-memory  error.) 

Lines  40  and  50  can  be  omitted  from 
your  ozvn  program.  They  merely  print  the 
random  numbers  on  the  screen  for  this 
demonstration. 

This  method  of  generating  unique 
random  numbers  works,  but  suffers  from  a 
few  problems.  For  one  thing,  if  you  need  a 
great  many  random  numbers,  or  if  you 
can't  predict  how  many  you'll  need  as 
your  program  runs,  your  computer  may 
not  have  enough  memory  for  the  large 
array  that's  required.  Also,  if  the  number 
of  random  numbers  you  need  coincides 
with  the  allowable  range  of  the  random 
numbers,  this  routine  slows  down  almost 
to  a  crawl  as  it  struggles  to  generate  the 


last  few  unique  numbers. 

An  example  of  the  latter  problem  is 
when  you're  programming  a  card  game 
simulation  and  need  a  randomized  list  of 
52  unique  numbers  from  1  to  52,  each 
number  representing  a  card.  To  see  a 
demonstration,  set  S/Z£'=52  in  line  10 
and  modify  line  1000  so  it  generates  ran- 
dom numbers  restricted  to  the  range  of 
1-52.  When  you  run  the  program,  at  first 
it  has  no  trouble  coming  up  with  unique 
numbers.  But  soon  it  begins  exhausting 
the  possibilities.  By  the  time  it  reaches  the 
forty-fifth  unique  number,  it  is  having 
real  trouble  generating  numbers  which 
haven't  been  made  before.  The  fifty- 
second  number  is  the  hardest  of  all — it 
might  take  a  minute  or  longer.  (There  are 
better  ways  to  shuffle  a  list  of  numbers  for 
card  games,  but  we  haven't  room  to  cover 
them  here.) 

If  repeated  calls  to  this  subroutine 
slow  down  your  program  too  drastically, 
rewrite  it  slightly  to  fill  the  array  with  all 
the  unique  numbers  your  program  will 
need.  Then  call  the  routine  just  once,  as 
your  program  initializes.  Later,  whenever 
your  program  needs  a  unique  random 
number,  it  can  simply  pull  a  number  out 
of  the  array,  incrementing  a  counter  each 
time  so  the  same  number  isn't  retrieved 
more  than  once. 

Wide  SpeedCalc  Printouts 

Does  SpeedCalc  work  with  the  Sideways 
program?  1  would  like  the  ability  to 
print  out  a  spreadsheet  with  lots  of 
columns. 

Stephen  Forstein 

Because  SpeedCalc  allows  as  many  as  50 
cells  per  horizontal  row,  many  worksheets 
can't  be  printed  on  a  standard  80-column 
printer.  For  example,  a  12-month  work- 
sheet with  an  extra  left  cell  for  raw  titles 
and  an  extra  right  column  cell  for  totals 
will  be  126  columns  wide  (if  you  use  the 
default  column  width  of  nine  characters 
per  cell).  If  you  print  this  in  the  normal 
manner,  you'll  find  that  each  worksheet 
row  wraps  to  one  and  a  half  lines  on  the 
printout,  making  the  sheet  difficult  to  read. 
A  crude  solution  is  to  divide  the 
completed  sheet  into  several  sections — 
each  no  more  than  80  columns  wide — 
then  print  the  sections  separately  and 
tape  them  together.  Condensed  printing 
mode  offers  a  more  elegant  solution,  if 
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22  EAST-PACED,  EXCITING  EVE 
\  GO  FOR  THE  GOLD!  ^^ 


SUMMER  GAMES.® 

Want  some  great  play  action?  This 
award  winning  best  seller  brings  you 
eight  great  events,  including  Swimming, 
Diving,  TVack,  Gymnastics,  and  more. 
Compete  against  world  records.  Or  get 
together  with  a  group  of  up  to  eight  for 
some  good  competitive  fun.  Realistic, 
graphics  and  action  will  challenge  you 
again  and  again  to  go  for  the  gold. 

SUMMER  GAMES  II  ~ 

You  asked  us  for  more  great  events. 
Here  they  are.  Rowing,  TViple  Jump, 
Javelin,  High  Jump,  Fencing,.  Cycling, 
Kayaking,  even  Equestrian.  Like 
SUMMER  GAMES,  you  get  spine  Ungl- 
ing  action  and  challenge  for  one  to 
eight  players.  These  aren't  just  games. 
They're  the  games.  And  you're  the  star. 

WINTER  GAMES  ~ 

You've  got  to  see  the  graphics,  and  feel 
the  knot  in  your  stomach  as  your  bob- 
sled careens  along  the  walls  of  the  run 


to  know  why  people  are  wild  over 
WINTER  GAMES.  Seven  events  give 
you  a  variety  of  action— from  the 
endurance  of  the  Biathlon  to  the 
timing  of  the  Ski  Jump,  and  more. 

What  are  you  waiting  for? 

Play  your  favorite  events  over  and 
over  Play  all  22.  Set  up  teams.  Chal- 
lenge your  friends.  These  great  action- 
strategy  games  are  sure  to  be  the  stars 
of  your  collection. 
At  your  local  Epyx  dealer. 


i.      if 


.# 


Summer  Games 
Summer  Cames  II 
Wrnler  Games 


spyx. 
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your  printer  supports  it  (Commodore 
printers  do  not).  On  most  printers  this 
allows  a  132-character  line,  enough  for 
more  than  14  default-width  cells  across. 
You'll  need  to  set  the  printer  for  con- 
densed printing  before  you  run  Speed- 
Calc,  either  by  setting  the  appropriate 
DIP  switch  on  the  printer  or  by  sending 
the  proper  command  codes.  For  example, 
CHRS(15)  works  for  Epson  and  Epson- 
compatible  printers.  You  may  have  to  use 
"transparent  mode"  to  send  this  command 
through  your  interface.  For  instance, 
Cardco  interfaces  require  OPEN  4,4,4: 
PR1NT#4,CHR$(15):  CLOSE  4. 

With  the  Commodore  (January  1986) 
and  Apple  (February  1986)  versions  of 
SpeedCalc,  the  commercial  program 
Sideways  does  let  you  print  your  sheets 
vertically  doiun  the  page  instead  of  hori- 
zontally across.  This  allows  you  to  print 
spreedsheets  of  virtually  unlimited  width. 
The  only  restriction  is  that  Sideways  re- 
quires ASCII  text  files.  For  the  Apple,  just 
use  Open  Apple-CTRL-P  to  print  a  copy 
of  the  sheet  to  disk.  For  the  64/128,  the 
procedure  is  slightly  more  complicated, 
since  Sideways  requires  that  the  data  be 
in  a  SEQ  (sequential)  file  and  SpeedCalc 
prints  a  PRG  (program)  file  to  disk.  (The 
SpeedCalc  article  in  the  January  issue  is 
in  error  when  it  states  that  printing  to  disk 
stores  the  data  in  a  sequential  file.)  To  use 
Sideways  with  Commodore  SpeedCalc, 
you  must  print  (not  save)  the  sheet  to  disk, 
then  convert  the  printed  data  file  from 
PRG  format  to  SEQ  format.  The  short 
program  below  performs  this  conversion: 

10    PRINT"{CLR] (DOWN) [RVSJ    PRG 

[ SPACE] ->  SEQ  FILE  COHVE 

RTER  ":2$=CHR5{0) :OPEN  3 

,8,15, "10: ":GOSUB  100 
20  FP$="": INPUT "NAME  OF  PRG-TY 

PE  FILE";FPS:IF  FPS=" "  T 

HEN  20 
30  OPEN  l,8,8,"0s"+FPS+",P.R": 

GOSUB  100: IF  S  THEN  CLOS 

E  liGOTO  20 
40  PS5="":INPUT"NAME  FOR  SEQ-T 

YPE  FILE";FS?:IF  FS5="" 

{SPACE} THEN  40 
50  OPEN  2,8,9,  "0: "+FS$  +  ",S,W"i 

GOSUB  100! IF  S  THEN  CLOS 

E  2 :GOT0  40 
60  PRINT"WORKING. . . "; :GET#1 ,A? 

,A$ 
70  GET#1,A$:A=ASC{AS+Z?) :S=ST: 

PRINT#2,CHR5(A); :IF  (S  O 

R  ST)=0  THEM  70 
80  IF  (S<>64)  OR  ST  THEN  A$="" 

:GOTO  120 
90  CLOSE  2:CL0SE  IrCLOSE  3:PRI 

NT "DONE" SEND 
100  IHPUT#3,S,AS :IF  S=0  THEN  P 

RINT: RETURN 
110  IF  (S=62)  OR  (3=63)  THEN  P 

RINT"  (  RVS  J  "  ;  A?  :  RETURN 
120  CLOSE  2:CL0SE  1:CL0SE  3 :PR 

INT" [DOWNj {RVSJ DISK  ERRO 

R :  "  ;  AS 

Sideways  is  a  product  of  Funk  Soft- 
ware ('222  Third  Street,  Cambridge,  MA 
02142):  the  Commodore  64/128  version  is 
distributed  by  Timeworks.  Inc.  (444  Lake 


Cook  Road,  Deerfield,  IL  60015). 

Atari  ST  Languages 

What  languages  are  available  for  the 
Atari  ST? 

Randy  Johnson 

Atari  includes  ST  BASIC  and  Logo  with 
the  purchase  of  an  ST  system.  Below  is  a 
list  of  additional  languages  available  or 
under  development  for  the  ST  at  the  time 
of  this  writing  (mid-February).  This  list  is 
by  no  means  complete— neiv  ST  applica- 
tions, including  languages,  are  announced 
on  an  almost  daily  basis.  Your  Atari  dealer 
is  a  good  source  of  information  about  new 
products.  You  should  also  keep  an  eye  on 
the  product  evaluations  in  COMPUTEl's 
"Revieit's"  and  "News  &  Products"  sec- 
tions. Advertisements  are  timely  infor- 
mation sources  as  well,  since  it's  common 
for  a  developer  to  announce  a  product  in 
ads  before  actually  releasing  it  on  the 
market. 


Language 

Compiled  BASIC, 
Henry's  Funda- 
mental BASIC, 
C,  Pascal, 
FORTRAN 

Haba  Hippo-C 


Lattice  C, 
Meta  Pascal, 
Macro  Assembler 
Editor 

Personal  Pascal, 
Personal  Prolog 


4  X  FORTH 


Modula-2 


Company 

Philon 

641  Avenue  of  the 

Americas 
New  York,  NY  10011 

Haba  Systems 
15154  Stagg  Street 
Van  Nuys,  CA  9U05 

Antic  Software 

524  Second  Street 

San  Francisco,  CA  94107 


Optimized  Systems 

Software  (OSS) 
1222-B  Kenlwood  Avenue 
San  Jose,  CA  95129 

The  Dragon  Group 
148  Poca  Fork  Road 
Elk  View,  W.  VA  25071 

TDI  Software  Inc. 
10410  Markison  Road 
Dallas,  TX  75238 


Reading  Apple  Keys 

I  have  just  read  Apple  SpeedCalc  in 
COMPUTEI's  February  1986  issue  and 
noticed  that  the  program's  commands 
use  the  Open  Apple  and  Closed  Apple 
keys.  How  do  you  read  those  keys? 
They  don't  show  up  in  INPUT  state- 
ments or  when  the  keyboard  is  read. 
Can  I  access  them  from  BASIC  or  only 
from  machine  language? 

David  Reed 

The  Open  Apple  and  Closed  Apple  keys, 
which  appear  only  on  Apple  lie  and  lie 
computers,  are  easy  to  read  from  BASIC  or 
machine  language.  Both  can  be  read  in 
BASIC  by  PEEKing  certain  memory  loca- 
tions. The  value  in  location  49249  ($C061) 
IS  128  or  greater  if  the  Open  Apple  key  is 
pressed,  and  less  than  128  if  it  is  not. 


Location  49250  (SC062)  gives  the  same 
information  for  the  Closed  Apple  key. 
Here's  a  program  fragment  that  gets  a 
keypress  and  also  checks  these  two  special 
keys: 

100  GET  K$  :  REM  WAIT  FOR  A 

KEYPRESS 
110  OA  =  PEEK(49249)  :  CA  = 

PEEK(492S0) 
120  IF  K$="a"  AND  OA  >=  128  AND 

CA  <  128  THEN  GOSUB  1000 

These  statements  call  a  subroutine  at  line 
1000  if  Open  Apple-A  is  pressed,  but  not 
if  Open  Apple-Closed  Apple-A  is  pressed. 

Amiga  Graphics  Update 

We  enjoyed  your  article  on  the  graphics 
for  Commodore's  new  Amiga  computer 
["Amiga's  Amazing  Graphics,"  COM- 
PUTE!, November  1985].  Most  of  the 
information  was  very  accurate,  and  the 
picture  describing  bit  plane  graphics 
was  particularly  effective.  There  was 
some  inaccuracy,  however.  The  actual 
color  map  at  640  X  200  resolution  is 
the  same  as  it  is  at  320  X  200,  and  there 
are  no  restrictions  on  adjacent  pixels. 
Somehow,  you  must  have  gotten  some 
old  documentation.  Also,  although  In- 
tuition supports  dual  playfield  mode,  it 
does  not  do  multiple  screens  using  dual 
playfield  mode — it  uses  the  video  co- 
processor to  rewrite  the  display  param- 
eters. This  is  much  more  flexible,  as  any 
display  parameter  can  be  changed  in- 
stead of  just  the  color  map.  You  can 
change  resolution,  color  map,  or  num- 
ber of  bit  planes  between  screens  run- 
ning simultaneously. 

Glenn  Keller 
Commodore-Amiga,  Inc. 

We  appreciate  your  comments.  At  the  time 
we  wrote  the  article,  we  were  ivorking 
with  the  prerelease  Hardware  Manual, 
which  described  an  earlier  version  of  the 
graphics  chips. 

As  you  say,  the  final  graphics  hard- 
ware does  not  impose  any  restrictions  on 
color  resolutions.  Early  graphics  chips 
could  not  fully  change  the  color  signal 
between  adjacent  pixels  in  640  X  200 
mode,  but  the  current  hardware  permits 
any  of  16  colors  (from  the  palette  of  4,096 
colors)  at  any  pixel  position,  or  32  simul- 
taneous colors  for  the  320  X  200  mode. 
The  400-line  interlaced  modes  have  the 
same  color  capability  as  320  X  200  and 
640  X  200. 

Since  the  Workbench  uses  only  four 
colors  (two  bit  planes),  we  assumed  that 
dual  playfields  (where  two  independent 
screens  can  be  overlapped  and  merged) 
were  used  to  support  pull-down  custom 
screens.  Since  every  multitasking  applica- 
tion can  call  for  its  own  custom  bitmap. 
Intuition  allows  these  custom  screer^s  to 
be  overlapped  and  repositioned  vertically 
with  the  mouse.  This  effect  can  be  seen 


12     COMPUra      May  1966 


PREMIUM  QUALITY!       LIFETIME  WARRANTY! 

DtSK  SALE! 


Mtihdv  b]r  Cdp  irtdkviv  not  iax-i'iul  or  -ftflfflnrfk  W^ 
bur  miEBn»  q\  F«{-Icki  9*t(pr^ucl>aq.  Wl  CJn't 
prbt  the  fnahsr,  but  ^ouH  leco^cnije  Ih^ri  it  fro"' 

*(i]0nE  lh«  HIGHEST  QUALITY  pAtMluM  DISKS 
MADE:  Ccrlilipd.  EUirirrtrril  I0{|-.  •ner  li^f, 
UNCONDITIOS^KL  JO  DAV  MONEV  SACK 

5tTI5F*CTlOK  CLUFJtNTEC;       3j:h 

Fr ;;!  a':  :r  ■  t->  |lj?    EO;    \i.     \- 


SS.CDJS'Ti 
SS.'DD1crS 


If,-: 


■lie  3Bc  33p: 


JDZ|l;:    ED:  53:   rfi:  VI: 


3  ;'  iingie  SiiM  <UEQ 


M£SlJ3|lK)|l.T7i 


E.  SS'SQioRsEcLtUCa 


rC:  tfi:  57;   43t[46: 


U'tiriLMOO  hold!  LOO  diiki.  (rilh  iMk  jni!  krj.  [cmoi(jbl«  to?  WZ.tl 

UMiriLE-70,  irp-lap,  heJdi  70  A^\\.\,  \\t  "Iliti-r-ril*-  jB.ai 

UifiriLE  10  LIBRARY  CASES.  heiOi  tO  diiki.  dtar  pl»lir.  99t 

UiirPAJ(  5  ■■  r  DISK  VAILCI^S.  Mrdticuj-d.  holdi  2-3  ditks,  10  lor  K 

RICiD  PiSK  54'  DI$K  MAILER^,  hard  gibstic.  hdii)}  5  dr«k>  SL  c* 

LEHEft  QUALCQMPUTEH  P4PER  25O0  iPtftts  2Q-  micmptrf  H'jjii:-  sLQP  JZ* 

DflJiFT  qi/^L  COMPUTEFI  P4P£R  3J00  sherti  16=  itd^perf  fi'itll"  =DQP  i29 


HOW  TO  OfiO£ti:  Crdir  by  nhnr*  or  mill,  piy  by  MC-VI»>-Ani>'CDD. 
CI  i«nd  fncck  *->th  «>rdti.  fnlnlmLni  ardf  S20.  »6tl  S3  la'  ihipp-nd  ('er- 
pjp«'  OgP  LiJ»'Mi«i*0-2'l3  <ln.  jlQt  1-&S5  crn.  iips7^^  lb  ttn)  Add 
S^.ICDD  Canailj)^  iMgplni.  Ws  (An  iKig  spvn  iccauni  lo  Khnali  wllfi 
p004cr,dPt.  T„r.LniLni  purr h^.*  rrdir  SUM.  FOP  yn.tP.K  AU  orrfrrt  m-tt 
>nclj3«  tiivtlT*  phon*  ina  STREET  add'tii-  SirO  Icr  FREE  CATALOG 

LitlirtJ  ID'O't  Ol  diiC«L.ill  CDiitCulTf   tuApl*!.] 


,?^  (800)3430472 
UNITECH 


\H  MASS^f^lTrUMITECH" 

20-u  hurLcy  street 

CAMBRIDdE,  MA  02141 


ATTENTION  T.I.  99/4A  OWNERS 

•  Diskettes- 59«  each!  Your  choice  SS  or 
DO 

•  512K  Now  Available  for  the  99/4A! 

•  99/8  Level  4  Computer  Upgrade  Now 
Available 

•  Over  1500  Hardware  and  Software 
Accessories  at  Similar  Savings 

THE  WORLD'S  LARGEST 
COMPUTER  ASSISTANCE  GROUP 

Wow  serving  over  35,000  members  worldwide 
with  the  best  in  technical  assistance,  seiyice, 
and  products  tor  the  Texas  Instrument  99/4A 
Computer. 

To  become  a  member  and  receive  r\awslellars, 
catalog,  technical  assistance  and  membership 
package,  send  $10.00  tor  a  ONE  Year  Member- 
ship to: 

99/4A  National  Assistance  Group 

National  Headquarters 

P.O.  Box  290812 

Ft,  Lauderdale,  Florida  33329 

Attention  Membership  Division 

For  Further  Information  Call  24  Hours 

(305)  583-0467 


Foolish  to 
pay  more. 

Dangerous 
to  pay  less. 
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ACCESS  SOFTWARE'S  best  selling  and  award  winning  war 
game  series  Is  now  available  for  APPLE  lie  lie  H+,  ATARI  800 
series  and  COMMODORE  128/64.  Each  game  features  strategy, 
arcade  action  and  incredible  three  dimensional  graphics. 
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BEACH-HEAO  -  A  peaceful  island  is  being  held  by  a 
ruthless  dictator  and  its  up  to  you  to  liberate  the 
natives!  Be  careful,  because  you'll  encounter  enemy 
aircraft,  battleships,  tanks,  and  an  almost 
impenetrable  enemy  fortress! 
$34.95  -  Commodore/Apple/A1ari. 


-    X 


BEACH-HEAD  li  -  The  dictator's  bacl<  and  more 
ruthless  than  ever!  If  your  troops  can  survive  the  land 
assault  and  rescue  the  prisoners,  you'll  face  the 
dictator  in  a  one  on  one  battle  of  superionly.  Beach- 
head is  a  true  "head  to  head"  Iwo  player  game  that 
allovi/s  you  to  play  with  a  friend  or  the  computer. 
$39.95  -  Commodore,  $34.95  Apple/Atan. 


RAID  OVER  MOSCOW  -  The  alert  sounds  at  SAC 
(Strategic  Air  Command).  The  Soviets  are  about  lo 
launch  a  nuclear  strike!  With  our  own  nuclear  arsenal 
dismantled,  our  only  hope  is  our  space  station  armed 
with  stealth  aircraft.  Can  your  commandos  turn  back 
the  attack,  strike  the  Soviet  Defense  Center  and  avert 
gygtear  disaster?  Top  multiscreen  actioni 
p  -  Commodore,  S34.95  Apple/Atari. 


! 


For  Apple 

Atari  and 

Commodore- 


:  Software  Incorporated 


VISIT  YOUR  FAVORITE  RETAILER... 

For  mail  orders,  enclose  check  or  money  order,  plus  $1 .00  shipping 
and  handling,  and  specify  machine  version  desired.  Order  by  phone 
on  VISA,  MasterCard  or  C.O.D.  by  calling  801  /  298-9077. 

ACCtSS  SOFTWARE,  INC  2b6l  South  l.'jfiO  Wesi  Woods  Cross,  UT  64087 


when  you  dick  and  drag  the  menu  bar 
with  the  left  mouse  button.  When  the  left 
button  is  held  down,  pulling  the  mouse 
downward  reveals  the  background  Ami- 
gaDOS  screen.  It's  also  possible  to  switch 
between  a  custom  screen  and  the  Work- 
bench screen  by  pressing  either  left 
Amiga-M  or  Left  Amiga-N. 

The  special  copper  (as  in  coproces- 
sor) circuitry  tracks  the  video  beam  on  the 
fly.  The  copper's  instruction  list,  similar 
in  concept  to  Atari  SOO  display  lists,  can 
perform  any  video  change  at  any  line,  as 
with  display  list  interrupts  (Atari)  or  ras- 
ter interrupts  (Commodore).  The  operat- 
ing system  permits  applications  to  modify 
the  copper  list,  giving  full  video  control  to 
the  application,  while  using  the  copper 
list  itself  for  the  graphic  effect  of  overlap- 
ping screens.  A  copper  wait  instruction 
tells  the  copper  to  wait  until  the  video 
beam  reaches  a  certain  line,  and  then  the 
video  registers  are  reset  to  display  another 
screen.  The  normal  display  is  automati- 
cally reset  at  the  top,  so  you  get  two 
overlapping  screens,  even  with  different 
colors  and  resolutions. 

Tl  Tips  Book 

In  an  effort  to  provide  easily  accessed 
documentation  to  TI  users,  I  have  put 
together  a  TI  tips  booklet  that  consists 
of  99  tips  for  the  TI-99/4A.  These  are  a 
compilation  of  suggestions  given  in  our 
user  group  newsletter.  They  include 
PEEKS,  POKEs,  listings,  hints,  and  so 
on.  Also  included  is  a  complete  disk 
drive  memory  map,  summary  of  Ex- 
tended BASIC  commands,  and  a  sort- 
ing program  written  in  BASIC  and 
machine  language.  One  such  tip  that 
may  interest  your  readers  allows  them 
to  disable  FCTN  =  (QUIT)  in  Extended 
BASIC.  To  do  this,  enter  this  statement: 

CALL  INIT  ::  CALL  LOAD(-31806,16) 

To  enable  it  again,  type  CALL 
LOAD{- 31 806,0).  Another  POKE  al- 
lows you  to  prevent  Extended  BASIC 
programs  from  being  listed.  Type  CALL 
LOAD{-31931,128)  to  do  this.  To  un- 
protect  Extended  BASIC  programs,  en- 
ter CALL  LOAD( -3193 1,0).  The  TI 
tips  booklet  is  available  through  the 
Central  Iowa  99/4A  Users  Group  for  $4 
(the  cost  of  materials,  printing,  and 
postage)  at  the  following  address: 

Central  Iowa  99/4A  Users  Group 

Box  3043 

Des  Moines,  lA  50316 

John  Hamilton 
Thank  you  for  providing  this  information. 

Setting  Atari  Tabs 

I  read  with  interest  your  examples  of 
programming  Atari  tab  stops  using 
memory  location  201 .  This  location  is  in 
the  BASIC  zero  page  RAM  because  it  is 


used  only  by  BASIC,  and  can  only  be 
used  with  PRINT  statements  contain- 
ing commas.  The  true  tab  function  is 
executed  by  the  operating  system  (the 
text  editor).  It  is  associated  with  memo- 
ry locations  675-689,  These  memory 
locations  form  the  tab  set  map.  The 
highest  bit  of  location  675  corresponds 
to  column  zero,  and  the  lowest  bit  of 
location  689  conesponds  to  column  120 
of  the  logical  line.  Normally  every 
eighth  bit  is  set  (as  can  be  seen  by 
experimenting  with  the  TAB  key).  This 
can  be  changed  either  with  the  TAB 
CLEAR  and  TAB  SET  keys  or  by  POKE- 
ing  values  to  the  map  locations.  For 
example  the  following  program  clears 
the  map  with  POKEs,  then  prints  the 
heading  while  using  the  TAB  SET  char- 
acter, CHR$(159).  Then  the  names  and 
addresses  are  printed  while  using  the 
TAB  character,  CHR$(127). 

10  FOR  1=675  TO  6B9:PDKE 

I,0:NEXT  I 
20  DIM  NAME* (10> , ADDRESS* 
(25)  ,  TAB*  < 1 )  , TABSET* ( 1 
) 
30  TABS=CHR*(127) :TABSET5 

=CHR* ( 157) 
40  PRINT  "NAMEtl3  SPACES> " 

; TABSET*; "ADDRESS" 
50  PRINT 
60  FDR  A=l  TO  4 
70  READ  NAMES; ADDRESS* 
80  PRINT  NAME*; TAB*; ADDRE 

SS* 
fe    NEXT  A 
100  END 
110  DATA  ADAMS, 12  MAIN  ST 

REET 
120  DATA  ARTHUR, 1515  SUNN 

Y  STREET 
130  DATA  SMITHSON, 100  CIR 

CLE  DRIVE 
140  DATA  WEEKS, 2  DONNA  LA 
NE 

Sherwood  Stolt 
Thank  you  for  the  additional  information. 

Custom  Characters  For 
Plus/4  And  16 

1  was  wondering  how  the  Commodore 
Plus/4  can  generate  user-defined  char- 
acters and  where  I  would  POKE  them 

into  memory, 

Sean  Donovan 

The  following  program  redefines  the  @ 
character  as  the  familiar  Commodore  logo 
symbol 

FX  10  FORA=S28TO860:READB:POKE 

A,BsNEXT:SYSa28 
AM  20  POKE65298,PEEK(65298)AND 

251 
HP  30  POKE65299,PEEK(65299)AND 

3OR60 
SR  40  FORA=15360TO15367:READB: 

POKEA,BsNEXT 
JA  50  DATA  169,60,133,3,169,0, 

133,2,133,4,169,208,133 
AC  60  DATA  5,162,3,160,0,177,4 

,145,2,136,203,249,230 
SK  70  DATA  3,230,5,202,16,242, 

96 


HD  80  DATA  98,146,130,130,144, 
9 8, 0,0  I REM  CUSTOM  CHARAC 
TER  DATA 

Two  memory  locations  are  important 
for  custom  characters  on  the  Commodore 
Plus/4  and  16.  Bit  2  of  location  65298 
controls  whether  character  data  is  fetched 
from  ROM  or  RAM.  The  POKE  in  line  20 
switches  from  the  normal  ROM  character 
definitions  to  a  custom  character  set  in 
RAM.  The  upper  six  bits  of  location  65299 
tell  the  computer  where  the  character  set 
is  located  in  memory.  When  POKEing  to 
location  65299  it  is  important  not  to  dis- 
turb its  lower  two  bits.  To  determine  the 
number  to  POKE  into  this  location,  divide 
the  starting  address  of  the  custom  charac- 
ter set  by  256.  Since  the  example  program 
puts  the  character  set  at  location  15360, 
we  use  the  POKE  in  line  30. 

The  program  uses  a  machine  lan- 
guage routine  to  copy  the  character  set 
from  ROM  to  RAM  beginning  at  location 
15360.  To  copy  the  character  set  to  some 
location  other  than  15360,  replace  the 
second  number  in  line  50  (currently  60) 
with  the  number  you  POKEd  into  line  30. 
Line  40  reads  the  custom  character  data 
from  line  80  and  POKEs  it  into  the  area 
reserved  for  the  definition  of  the  @ 
symbol. 

IBM  Mazes  And  Movement 

I  am  trying  to  write  a  maze  game  for  the 
IBM.  How  could  I  write  the  program  to 
randomly  generate  a  simple  maze,  al- 
lowing me  to  choose  the  dimensions, 
and  make  sure  that  it  is  a  solvable  one? 
Aaron  Greenberg 

Few  COMPUTE!  programs  have  spawned 
so  many  offspring  as  Charles  Bond's  maze 
generation  algorithm,  originally  pub- 
lished in  the  December  1981  issue.  The 
short  and  simple  procedure  generates  a 
maze  that's  different  every  time  the  pro- 
gram is  run,  yet  is  always  solvable.  Here's 
a  PC/PCjr  adaptation  for  SCREEN  1,  the 
medium-resolution  graphics  screen  (for 
the  PC,  this  requires  a  color/graphics 
adapter).  In  place  of  the  PEEKs  and 
POKEs  of  the  earlier  versions,  this  one 
uses  BASIC'S  SCREEN,  LOCATE,  and 
PRINT  statements: 

«K  100  KEY  OFF:  SCREEN  1,0:  COLOR 
1,0:CLS: RANDOMIZE  TIMER 

DJ  110  MAXROW=23:MAXCDL=40:DIM  P 
(3, 1):F0R  J=0  TO  3: READ  P 
(J,0) ,P(J, l>  sNEXT 

1£  120  DATA  0,2,-2,0,0,-2,2,0 

Dll    130    HL=a:YPDS=2:XP0S=2: LOCATE 
YPQS.XPOS: PRINT    CHR«(5) 

00    140    J=INT(RND(1>«4):X=J 

NP    150    NY=YPOS+P(J,0):NX=XPOS+P( 
J,1):IF   NY<1    DR    NY>MflXROW 
OR    NX<1    OR    NX>MAXEDL    THE 
N    170 

JP  160  IF  SCREEN  (NY,  NX  )=0  THEN  L 
DCATE  NY, NX: PRINT  CHR*(J+ 
1 } : LOCATE  <  YPOS+P ( J , 0 ) /2 ) 
,  (XPOS+P(J,  n/2):PRINT  CH 
R* (HL) : YPQS=NY: XPOS=NX: SD 
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HALSO  RUNS  ON  6^K. 


Serious  runners  know  it  cakes  more  than  great  running  shoes  to  improve  performance.  It  takes  knowl- 
edge. Now  Puma  gives  you  both.  With  the  R5  Computer  Shoe.  The  first  training  shoe  to  combine  advanced, 
footwear  technology  with  computer  technology. 

The  RS  Computer  Shoe  has  a  custom-designed  gate  array  built  into  its  heel.  This  computer  chip 
records  your  run,  then  communicates  the  results  to  any  Apple  HE,  Commodore  64 
or  128,  or  IBM  PC  computer  j|h^^     ^ 

A  software  program  included  with  the  shoe  automatically  calculates  your  time,  distance  ^^^^K 

and  calories  expended.  Then  graphically  compares  them  to  past  performances  and  future  goals.        nil  ■Ifliiro^ 

The  RS  Computer  Shoe  from  Puma.  We'reso  out  front  in  technology,  we  put  UIDnUlIJi 

computers  in  the  backs  of  our  shoes.  ^^Hfflffl  B I  ■■  (^ 

Appl«»sr*fyMcredwderrBrkofApp5eCompuKr.[fK  ;Ct>imiiDdi?rc64iirdlIBarclrjdara;rbo(CammodoreCOiitputiTS)-s(CT!is;  IBMindiaMPCjtctcJSislcrcilradcmirksiiMBM  V^UK   WLJKLJ    FLJK   V^U/\J_J.  i  I 


ALL  NEW  SOFTWARE  LlNEUPl 

kyan  pascal  (Version  2.0) $69.95 

(cyan  pascal  is  the  ideal  system  for  learning  Pascal  and  developing  Pascal  programs.  It's  a  full  implementation  of  ISO 
Pascal  and  conforms  to  the  standards  set  by  the  Federal  Software  Testing  Center  kyan  pascal  features  a  menu-driven  en- 
vironment with  multiple  HELP  screens;  a  full-screen  text  editor;  and,  optimized  6502  machine  code  compiler/assembler  It 
produces  code  that  runs  at  the  maximum  speed  possible  on  the  6502  microprocessor,  kyan  pascal  supports  many  exten- 
sions including  string  handling,  linking,  chaining,  random  files,  and  included  or  inline  assembly  source  code.  It  also  supports 
a  line  of  powerful  toolkits  which  make  it  possible  for  even  novice  programmers  to  develop  sophisticated  software,  kyan  pas- 
cal (Version  2.0)  requires  only  one  disk  drive.  It  is  available  for  the  Apple  II  (runs  in  ProDOS  and  requires  64K);  Atari  (runs 
DOS  2.5  and  requires  48K);  and  Commodore  64/128.  kyan  pascal  is  not  copy  protected  and  comes  with  a  Pascal  tutorial 
and  reference  guide. 


Programming  Utility  Toolkit  $49.95 

Programming  is  faster  and  easier  with  this  extensive 
library  of  utility  programs  and  file  management  proce- 
dures. The  Toolkit  includes  source  code  for  more  than 
20  utility  programs. 

Advanced  Graphics  Toolkit S49.95 

Add  stunning  graphics  to  your  Pascal  or  assembly  lan- 
guage programs.  With  the  Toolkit's  graphics  primitives. 
you  can  build  a  custom  graphics  library.  Or,  you  can  use 
the  Toolkit's  library  for  2  and  3  dimensional  transforma- 
tions, windows  and  clipping,  shading,  and  more. 


MouseText  Tooikii  (available  for  Apple  II  only) . .  $49.95 
Add  Macintosh-like  graphics  to  your  Pascal  programs. 
The  Toolkit  includes  routines  for  pull-down  menus,  win- 
dows, and  mouse-controlled  cursor  events  (Toolkit  re- 
quires Apple  lie  or  enhanced  lie). 

Macro  Assembler/Linker $69.95 

kyan's  latest  programming  tool  adds  a  new  dimension 
to  assembly  language  programming.  The  Assem- 
bler/Linker Includes  a  text  editor,  65C02  macro  assem- 
bler, object  module  linker,  debugger,  and  librarian. 


kyan  Software  offers  you  a  IS  day  money  back  guarantee.  See  tor  yourself .  . .  kyan  Is  the  best  programming  software. 
Send  Check/Money  Order:  kyan  software,  Dept.  P  •  1850  Union  Street,  #183  •  San  Francisco,  CA  94123 

Or  Call:  (415)  626-2080  •  Visa/MC  Accepted 

Please  include  S4.50/ordBr  (or  shipping/  handling;  $12  outside  North  America,  CA  residents  add  65%  sales  lax. 


TO  140 

DC  170  J=(J+1>1-(J<3)  :  IF  JOX  TH 
EN  150 

JK  180  J«SCREEN(YPOS, XPOS)-l!LDC 
ATE  YPOS,XPOS:PRINT  CHR$ ( 
HL) ; : IF  J<4  THEN  YPaS=YPO 
9-P(J,0):XPOS=XPDS-P(J, 1) 
:SQTO  150 

m    190  GOTO  1<?0 

To  customize  the  routine  for  your 
own  use,  change  MAXROYI  and  hAAX- 
COL  {line  110)  for  the  maximum  number 
of  rows  and  coiumns  in  the  maze.  (Don't 
make  MAXROW  greater  than  23,  since 
printing  on  the  bottom  two  lines  of  the 
screen  causes  scrolling.)  As  it  stands  now, 
the  routine  always  starts  constructing  the 
maze  from  the  upper-left  corner.  You  can 
change  this  by  changing  the  values  of 
XPOS  and  YPOS  (line  130).  The  values 
should  always  be  at  least  2,  but  less  than 
MAXROW  and  MAXCOL.  The  variable 
HL  (line  130)  defines  the  character  used 
for  the  paths  of  the  maze.  You  can  change 
this  to  any  character  you  desire,  but  its 
value  must  be  greater  than  5  (lower  values 
are  used  to  draw  the  maze)  and  less  than 
128  (higher  values  are  not  available  on  the 
graphics  screen).  Unfortunately,  this  set  of 
characters  does  not  include  a  reverse 
space  that  would  draw  solid  paths  for  the 
maze.  It's  up  to  you  to  define  which  end 
point  IS  the  finish  of  the  maze. 

Now  that  the  maze  is  in  place,  it's  an 
ideal  time  to  answer  a  letter  from  R.C. 
Loveland,  who  wants  to  know  how  to  use 
the  IBM  joystick.  The  joystick  is  an  ideal 
tool  for  maneuvering  a  player  through  the 
maze,  and  BASIC'S  STICK  and  STRIG 
functions  make  it  easy  to  read.  IBM  joy- 
sticks are  "positional";  they  return  values 
that  reflect  the  horizontal  and  vertical 
deflection  of  the  stick  relative  to  a  simple 
coordinate  system.  In  this  system,  coordi- 
nate 0,0  means  the  stick  is  pushed  to  the 
upper-left  corner,  and  255,255  means  the 
stick  is  pushed  to  the  lower-right  comer. 
STICK(0)  returns  the  horizontal  (x)  coordi- 
nate of  the  first  joystick,  while  STICKd) 
returns  the  vertical  (y)  coordinate. 
STICK(2)  and  STICK(3)  perform  the  corre- 
sponding functions  for  the  second  joystick. 
The  only  special  rule  is  that  STICK(0) 
jnust  be  read  first,  before  any  other  direc- 
tions. (Even  if  you  only  want  positions 
from  the  second  joystick,  you  must  read 
STICK(0)  first.) 

STRIG  reads  the  status  of  the  joystick 
buttons — most  IBM  joysticks  have  two, 
but  only  one  per  joystick  can  be  read 
unless  you're  using  BASICA.  You  must 
use  the  statement  STRIG  ON  before  you 
can  read  button  status.  After  enabling 
button  reading,  STRIG(0)  returns  -1  if 
the  primary  button  on  the  first  joystick 
has  been  pressed  since  the  last  time 
STRIG(O)  loas  called,  or  0  if  it  has  not  been 
pressed.  STRIG(l)  is  slightly  different— it 
returns  —1  if  the  primary  button  on  the 
first  joystick  is  currently  pressed  (regard- 
less of  its  previous  state),  or  0  if  it  is  }tot 


pressed.  STR1G(2)  and  STR1G(3)  perform 
the  corresponding  functions  for  the  pri- 
mary button  on  the  second  joystick. 

This  system  makes  it  easy  to  deter- 
mine the  position  of  the  joystick.  But  in  a 
situation  like  navigating  the  maze  drawn 
by  the  routine  above,  what  you  really  need 
to  know  is  the  direction  in  which  the  stick 
is  pressed.  Add  the  lines  below  to  the 
maze-drawing  routine  above: 

LD    190    CH=1:XP0S=2:XPDS=2:  LOCATE 

YPQS.XPOS! PRINT    CHR*(CH) 

NK   200    XMOV=STICK<0)-XCTRiXJDY=S 

QN(XMDV):IF  ABS(XHOV)<10 

THEN    XJOY-0 
JH  210    YMDV=STICK(1)-YCTR:YJ0Y=S 

GN(YMOV):IF  ABS(YMOV)<10 

THEN  YJDY=0 
OB  220  NY=YPOS+YJOY:NX=XPaS+XJ0Y 

:IF  NY<1  OR  NY>23  OR  NX<1 
OR  NX>40  THEN  200 
CO  230  IF  SCREEN  (NY,  NX)  =0  THEN  2 

00 
J6  240  LOCATE  YPDS,  XPOS:  PRINT  CH 

R«ca):LOCATE  NY,NX:PRINT 

CHR«  a  J : YPDS=NY: XPOS-NX:  G 

OTO  200 

Line  190  defines  character  1  {the 
reverse-smiling  face)  as  the  player,  then 
positions  it  at  the  start  of  the  maze.  Lines 
200-210  calculate  two  directional  values, 
XJOY  and  YJOY,  based  on  how  far  the 
stick  IS  moved  from  the  center  positions 
(XCTR  and  YCTR).  XjOY  is  - 1  if  the  stick 
is  moved  to  the  left,  1  if  the  stick  is  moved 
to  the  right,  and  0  if  the  stick  is  not  moved 
horizontally.  YfOY  is  —1  if  the  stick  is 
moved  up,  1  if  the  stick  is  moved  down, 
and  0  if  the  stick  is  not  moved  vertically. 

The  advantage  of  this  system  is  that 
the  screen  player  can  be  moved  very  sim- 
ply in  relationship  to  the  joystick  by  add- 
ing the  XJOY  and  YJOY  values  to  the 
current  position  and  using  the  LOCATE 
statement  (lines  220  and  240).  The  sensi- 
tivity of  the  joystick  can  be  adjusted  by 
changing  the  value  in  the  ABS  test  (lines 
200-210).  As  shown,  the  joystick  must  be 
moved  at  least  10  increments  in  the  de- 
sired direction  for  the  change  to  register. 
This  prevents  small  jiggles  of  the  stick 
from  causing  unwanted  movement.  The 
test  in  line  230  prevents  the  player  from 
leaving  the  maze.  The  SCREEN  function 
returns  0  if  no  character  has  been  printed 
in  a  position,  while  a  maze  path  position 
will  hold  the  value  defined  by  HL  in  the 
maze-drawing  routine. 

One  additional  step  is  required  to  use 
this  joystick  routine.  Each  joystick  returns 
slightly  different  readings,  so  it's  difficult 
to  predict  what  the  values  for  the  center 
coordinates  will  be.  Thus,  it's  necessary  to 
calibrate  the  joystick  at  the  start  of  every 
program  that  reads  it.  The  following  lines 
show  how  this  can  be  done: 

PC  10  CLS:  WIDTH  40:STRIG  DN:PRIN 

T  "Press  fire  button  to  se 

t  center  position." 

PL  20  IF  STRIG(0)=0  THEN  20 

CO  30  XCTR=STICK(0):YCTR=STICK(1 

)  IB 
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Maybe  you've  never  thought  of  your- 
self as  an  artist,  but  maybe  you've 
never  had  the  right  tools  to  experi- 
ment easily  with  shapes  and  colors. 
There's  a  lot  of  software  available- 
ranging  from  simple  drawing  pro- 
grams to  digitizers  to  sophisticated 
animation  creators— thai  lets  you  ex- 
plore your  talent.  Some  is  even  used 
by  professional  artists  and  animators. 


Before  there  were  words,  there 
were  pictures.  Human  beings 
have  always  communicated 
with  art.  Although  the  media  have 
changed  over  the  centuries,  the 
need  to  express  ourselves  through 
pictures  has  always  existed,  even  if 
it's  just  doodling  on  a  legal  pad 
while  talking  on  the  telephone. 

Computers  got  into  the  act 
about  25  years  ago  when  Ivan 
Sutherland,  a  graduate  student  at 
the  Massachusetts  Institute  of 
Technology,  programmed  a  com- 
puter to  draw  a  straight  line.  Since 
then,  computer-generated  graphics 
have  evolved  rapidly.  And  they've 
been  used  for  many  business  appli- 
cations as  well  as  for  aesthetic 
purposes. 

We're  at  an  interesting  stage  in 
the  evolution  of  microcomputer 
graphics  in  1986.  Many  programs 
have  been  developed  over  the  last 
few  years  for  casual  use  on  home 


computers.  But  the  new  68000- 
based  machines,  such  as  the  Atari 
ST  and  Commodore  Amiga,  offer 
graphics  capabilities  previously  seen 
only  on  mini-  and  mainframe  com- 
puters. The  little  computers  are  start- 
ing to  catch  up  with  the  big  ones. 

You  probably  see  more 
computer-generated  graph- 
ics every  day  than  you  real- 
ize, especially  if  you  watch  much 
television.  Makers  of  rock  videos 
use  computers  extensively  to  pro- 
duce bizarre  images  and  special  ef- 
fects. Station  promos  and  title 
screens  for  movies,  TV  shows,  and 
newscasts  are  commonly  created 
with  computers.  Weather  forecast- 
ers use  computer  equipment  not 
only  to  track  and  predict  weather 
conditions,  but  also  to  prepare 
graphic  presentations  for  viewers. 
Usually,  the  graphics  you  see  on  TV 
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are  created  with  dedicated  work 
stations — special  computers  and 
programs  designed  specifically  for 
advanced  graphics  applications. 

As  the  early  microcomputer 
programmers  explored  applications 
for  their  machines,  they  came  up 
with  simple  drawing  programs. 
Though  many  of  these  programs 
were  crude  and  difficult  to  use  com- 
pared to  what's  available  today, 
they  allowed  nonprogrammers  to 
do  something  they  couldn't  do 
before:  create  images  on  a  computer 
screen,  using  the  keyboard  or  a  joy- 
stick to  select  options  and  draw 
pictures. 


In  1984,  something  happened 
that  pushed  the  evolution  of  micro- 
computer graphics  a  bit  further: 
Apple  introduced  the  Macintosh. 
Two  elements  of  this  computer's 
design  had  a  great  impact  on  the 
next  step  in  computer  graphics. 
First,  it  used  Motorola's  68000 
microprocessor,  a  more  sophisticat- 
ed chip  that  allows  higher-resolu- 
tion bitmapped  screens.  Second,  its 
user  interface,  incorporating  pull- 
down menus  and  mouse  control, 
made  the  Mac  very  easy  for  the 
average  person  to  use. 

In  1985,  the  Atari  ST  and  Com- 
modore Amiga  hit  the  market,  of- 


Amiga  LIVE,  a  peripheral  that  accommodates  digitization  of  real  images  on  the 
computer  screen,  was  used  to  create  this  picture.  (Courtesy  of  Commodore-Amiga.) 


The  Amiga's  impressive  graphics  capabilities  are  well  illustrated  in  this  picture 
created  using  Aegis  Images,  from  Aegis  Development. 
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fering  similar  ease  of  use  and 
superior  graphics  capabilities,  in- 
cluding color.  And  since  they  cost 
less,  both  machines  are  opening  up 
the  computer  graphics  field  to  even 
more  software  developers  and 
consumers. 

When  you  draw  and  paint  a 
picture  using  traditional 
artist's  tools,  there  are 
several  processes  required  after  vi- 
sualizing what  you're  going  to 
draw — though  the  order  may  vary 
from  person  to  person.  You  draw 
shapes  and  fill  some  of  them  in. 
You  mix  different  colors  of  paints  to 
come  up  with  just  the  right  shade. 
You  create  backgrounds.  And 
sometimes,  you  scrap  the  whole 
thing  and  start  over. 

Many  draw-and-paint  pro- 
grams for  computers  let  you  do  all 
of  those  things,  but  take  advantage 
of  the  computer's  processing  pow- 
ers to  help  with  some  of  the  detail 
work.  Many  of  them  use  similar 
terms  to  describe  these  features, 
and  here  are  some  of  the  most 
common: 

DRAW  You  can  choose  the  width 
of  stroke  you  want  to  use  and  draw 
your  own  shapes  freehand. 
FILL  You  can  select  a  color  or  pre- 
defined pattern  (or  create  your  own 
pattern)  and  paint  the  inside  of  a 
hollow  shape  or  the  background. 
This  doesn't  require  painting  the 
area  with  the  input  device  as  you 
would  with  a  paintbrush;  you  just 
indicate  the  area  you  want  filled 
and  press  a  button  or  key.  It  fills 
almost  instantly. 

ZOOM  or  MAGNIFY  This  lets  you 
zoom  in  on  one  tiny  area  to  draw  in 
detail,  pixel  by  pixel.  With  some 
programs,  you  can  see  the  magni- 
fied area  and  the  overall  picture 
simultaneously,  or  at  least  by  flip- 
ping screens. 

CIRCLE  or  BOX  By  defining  two 
points  (centerpoint  and  radius  for  a 
circle  or  two  opposite  corners  of  a 
box),  you  can  instandy  create  a 
shape  between  those  points.  Many 
programs  have  a  variety  of  shapes 
to  choose  from.  Before  you  actually 
set  the  second  point,  most  pro- 
grams let  you  preview  the  shape 
and  adjust  its  size.  This  is  called  a 
"rubber  band"  effect  because  of  the 
way  the  shape  stretches  on  the 
screen. 


A 


Fl-om  the  minds  of  MASTERVOICE. 
Introducing  Butler  -  In  •  A  -  Box.  The 
world's  fet  environmental  control  sys- 
tem that  msjxmds  to  voice  commands. 
The  first  with  A.I.R.  (Artificial  Intelli- 
gent Recognizer);  a  futuristic  software 
program  which  makes  it  a  reality. 

Replace  pushbutton  control 
with  voice  activated  magic! 

Butler-In-A'Box  replaces  old-fashioned 
pushbutton  control  systems,  making 
them  obsolete.  At  the  sound  of  your 
voice,  he  carries  out  your  tasks.  All  you 
have  to  do  is  ASK!  FVom  the  comfort  of 
your  lavorite  easy  chair,  up  to  twenty 
feet  away. 

Control  all  of  your  electronic 
devices  at  the  sound  of 
your  voice. 

Butler-In-A-Box  puts  all  of  your  elec- 
tronic devices,  high  tech  or  not,  under 
your  voice  control.  He  will  dial  your 
phone  and  answer  incoming  calls  with- 
out ever  touching  him.  He  turns  yoLu-T\', 
stereo,  heating  systems  and  other  elec- 
tronic devices  on  and  off,  even  dims 
lights.  All  of  this  instantly  or  at  the  pre- 
determined times  vou  desire. 


Computerized  protection 
against  intruders. 

Butler-In-A-Box  has  a  unique,  built-in 
infrared  seasor  and  intiiision  detection 
system  that  guards  your  home  and  alerts 
you  to  uninvited  gue.sts.  When  he  de- 
tects intrudeis,  he  will  speak,  and  ask 
them  to  identify  themselves.  Only  you 
can  verbally  command  him  to  turn  off 
his  intmsion  detection  system,  because 
he  is  trained  to  recognize  only  your 
voice.  He  is  also  capable  of  intci ' 
with  your  existing  home  security  sys- 
tem, so  it  can  be  activated  by  yourvoice. 

Speaks  and  understands  any 
language. 

\bur  Butler-In-A-Box  is  smart  enough  to 
call  you  by  name  and  answer  "intelli- 
gently" with  a  variety  of  random  re- 
sponses —  in  any  language  you  wish! 
Even  with  aii  accent. 

Easy  to  install  and  use. 

Your  Butler  has  been  designed  with  you 
in  mind.  He's  so  simple  to  install  and 
use,  you  won't  believe  it.  Complete  with 
instmctional  audio  cassette  and  easy- 
to-follow  written  instnictions.  And,  iio 
special  iviring  of  your  home  is  required. 


Experience  the  technology  of  tomor- 
row, today!  Rjt  Butler-In-A-Box  to  work 
for  you.  Only  Sl,195. 

Order  dii^ect  or  send  for  our  tee  bro- 
chure by  ju.st  lifting  a  finger  (possibly 
for  the  last  time),  and  dialing  our  toll- 
fiiee  hot-line:  1-800-O-BUTLER.  (In 
California)  1-(714)  952-70.56.  Or  write: 

Riture  Systems  Marketing 
'Ml  Cumberland  Drive 


^(^j^STERIOICE 

V  V/  m    BUTLER  IN  A  BOX 


Future  Systems  Marketing  -Tomonmv's  dreams,  today's  reality. 


©1986  Mastenoic-c,  Ltd. 


Movie  Maker,  designed  by  Interactive  Picture  Systems  and  published  by  Electronic  Arts,  is  used  by  many  professional  animators. 
With  some  practice,  even  the  casual  user  can  create  sequences  like  the  one  shown  above.  These  four  frames  were  excerpted  from  a 
minute-long  cartoon  of  four  pieces  of  toast  popping  out  of  a  toaster,  performing  a  short  dance,  taking  their  bows,  and  popping  back  in. 


FLIP  Using  this  option,  you  can 
invert  or  otherwise  reorient  a  shape 
so  it  sits  at  a  different  angle. 
SPRAY  PAINT   or  AIR  BRUSH 

This  simulates  what  an  airbrush 
does,  something  like  fine-tuned 
spray-painting.  Most  programs  let 
you  select  from  a  variety  of  widths, 
densities,  and  colors. 
MIRROR  IMAGE  This  feahire  lets 
you  reverse  an  image  you've  al- 
ready created,  producing  a  mirror- 
image  effect.  With  some  programs, 
you  can  draw  while  this  mode  is 
active  and  see  a  reversed  reflection 
of  what  you're  drawing  on  the  oth- 
er half  of  the  screen. 
ERASE  or  UNDO  There  are 
usually  two  separate  commands  for 
deleting  mistakes.  One  erases  only 
the  last  thing  you've  done,  and  the 
other  erases  the  entire  picture.  Also, 
you  can  use  the  input  device  as  an 
eraser,  moving  around  and  deleting 
individual  areas  by  redrawing  them 
in  the  background  color. 
TEXT  Some  programs  let  you  de- 
sign your  own  character  sets  and 
integrate  text  with  illustrations. 

These  are  just  some  of  the  most 
common  features  found  in  drawing 
programs;  each  has  its  own  addi- 
tional options.  The  basic  look  of 
these  programs  is  fairly  similar, 
though.  Lately,  many  of  them  have 
imitated  MacPaint  by  displaying 
option  icons  around  the  perimeter 
of  the  screen.  You  select  the  icon 
representing  the  function  you  want, 
move  onto  the  drawing  surface, 
and  begin  using  the  function.  At 
any  time  you  can  move  off  the 
drawing  surface  and  choose  anoth- 
er icon.  Pull-down  or  drop-down 
menus  are  becoming  popular,  too. 
Input  devices  range  from  the  key- 
board to  joysticks,  light  pens,  graph- 
ics tablets,  or  mouse  controllers, 
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When  you're  done  with  a 
picture,  you  can  save  it  on 
disk  or  tape,  print  it  out  in 
black  and  white  or  color  (most  pro- 
grams are  compatible  with  popular 
printers),  exchange  it  with  other  en- 
thusiasts, hang  it  on  a  wall,  or  use  it 
as  an  illustration  in  a  newsletter  or 
other  publication.  {Many  of  the  fig- 
ures appearing  in  COMPUTE!  and 
COMPUTE!  books  have  been  creat- 
ed or  conceptualized  on  a  Macin- 
tosh.) Programmers  can  use  the 
finished  drawings  as  backgrounds 
or  title  screens.  For  instance,  the 
drawing  program  that  comes  with 
an  Atari  ST  system,  Neochrome,  has 


Aegis  Images  was  also  used  in  designing 
this  picture.  Aegis  Development  recently 
began  shipping  Aegis  Animator,  an 
animation  package  that  includes  the 
Images  program. 

been  used  by  at  least  one  commer- 
cial software  company  to  produce 
impressive  effects  in  a  graphics  ad- 
venture game. 

Though  many  drawing  pro- 
grams developed  for  the  newer  16- 
bit  computers  are  aimed  at  the 
commercial  market  (see  "Creating 
with  CAD:  Computer- Aided  De- 
sign" in  this  issue),  there  are  several 
programs  that  are  inexpensive  and 
easy  to  use,  ideal  for  people  who 
like  to  experiment  without  invest- 
ing a  lot  of  money.  That's  who  Tom 


Hudson  had  in  mind  when  he  de- 
signed Degas. 

Hudson  had  seen  some  demo 
programs  for  the  Atari  ST  last  June 
and  was  impressed  with  the  ma- 
chine's graphics  capabilities.  More 
of  a  programmer  than  an  artist, 
Hudson  sought  out  the  advice  of 
several  artists  and  started  writing 
his  own  drawing  program. 

The  result  is  Degas,  published 
by  Batteries  Included.  Degas  offers  a 
palette  of  500  colors  and  works  in 
any  of  the  Atari  ST's  three  screen 
modes.  The  number  of  colors  that 
can  be  displayed  simultaneously 
depends  on  the  mode — from  16 
colors  in  low  resolution  (320  X 
200)  to  black-and-white  only  in 
high  resolution  (640  X  400),  In  ad- 
dition to  these  colors,  the  program 
also  offers  a  selection  of  60  pat- 
terns. Unlike  many  drawing  pro- 
grams, the  actual  working  area  is 
separate  from  the  menu  screen;  you 
click  the  ST's  mouse  to  move  back 
and  forth.  Degas  retails  for  $39,95, 

One  of  the  best  drawing  pro- 
grams for  Apple  computers  is  Br0- 
derbund's  Dazzle  Draw.  This 
package  for  the  Apple  lie  or  128K 
Apple  lie  uses  a  Macintosh-like 
user  interface,  multiple  windows, 
cut-and-paste  editing,  and  help 
screens.  It  allows  ten  shapes  in  16 
colors  and  30  patterns  in  any  one 
picture,  and  is  compatible  with  a 
mouse,  graphics  tablet,  KoalaPad, 
or  joystick.  Dazzle  Draw  also  sup- 
ports Apple's  new  UniDisk  3,5, 
which  expands  the  program's  slide 
show  capacity  to  more  than  40  im- 
ages. It  retails  for  $59.95. 

Graphics  programs  were 
among  the  first  software  packages 
introduced  for  the  Commodore 
Amiga,  and  with  good  reason.  It's  a 
powerful  graphics  machine,  capa- 
ble of  producing  almost  TV-quality 
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SUPPORT  FROM  COMPUTE!  BOOKS 


Everything  for  the  Amiga.  From  BASIC  beginner's  guides  to  advanced  programming 
handboolts,  COMPUTE!  offers  you  information-packed  tutorials,  reference  guides, 
programming  examples,  ready-to-enter  applications,  and  games  to  help  you 
develop  your  computing  skills  on  Commodore's  Amiga. 


COMPUTEI's 


Reference 
'Vr-  Guide 
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COMPUTEi's  AmlgaDOS 
Reference  Guide 

Arlan  R.  Levitan  and  Sheldon  Leemon 
A  comprehensive  tutorial  and  feferenee  guide 
to  the  powerful  AmigaDOS — the  operating 
system  underlying  the  Workbench  and 
Intuition — this  book  offers  information  useful  to 
every  Amiga  owner.  It  defines  and  illustrates  all 
DOS  commands,  and  shows  you  how  to  create 
file  directories,  access  peripherals,  run  batch 
file  programs,  and  avoid  "disk  shuffle."  The 
screen-  and  line-oriented  text  editors  are 
explained  in  detail.  Numerous  examples  and 
techniques  explain  how  to  use  AmigaDOS  to 
make  operating  your  Amiga  both  convenient 
and  efficient. 
SI 4.95     ISBN  0-87455-O47-5 

Elementary  Amiga  BASIC 
C.  Regena 

Here's  your  introduction  to  the  new  and 
powerful  BASIC  on  the  Amiga  personal 
computer.  The  Amiga's  impressive  graphics, 
animation,  and  sound  can  be  unlocked  with  the 
right  commands,  and  BASIC  is  the  place  to 
start.  Complete  descriptions  of  Amiga  BASIC'S 
commands,  syntax,  and  organization  take  you 
from  the  beginner  level  to  a  full-fledged 
programmer.  Plus,  the  book  offers  you  ready-to- 
type-in  programs  and  subroutines  while 
showing  you  how  to  write  your  own  programs. 
T/iere  IS  a  disk  available  which  includes  the 
programs  in  the  book,  SI  3.95.  This  title  is  also 
available  as  a  book/disk  combination  for  $29.95 
(057-2). 
S  14.95     ISBN  0-8'7455-04 1  -6 


COMPUTEI'S 


PROGRAMMER'S 
GUIDE 


COMPUTEI'S  Amiga 
Programmer's  Guide 

Edited 

Your  tutorial  and  reference  manual  to 
AmigaDOS,  BASIC,  Intuition,  and  other 
Important  software  tools  which  accompany  the 
new  Amiga.  COMPUTEi's  Amiga  Programmer's 
Guide  is  a  clear  and  thorough  guide  to  the 
inner  workings  of  this  fascinating  new- 
generation  computer.  The  great  speed  of  Its 
58000  microprocessor,  coupled  with  the 
versatility  of  the  Amiga-specific  graphics  and 
sound,  makes  the  Amiga  one  of  the  most 
powerful  computers  available  today. 
This  book  is  the  key  to  accessing  the  Amiga's 
speed  and  power. 
SI 6.95     ISBN  0-87455-028-9 

Advanced  Amiga  BASIC 

Tom  R.  Halfhill  and  Charles  Brannon 
This  guide  to  applications  programming  on 
Commodore's  new  Amiga  contains  everything 
an  intermediate  programmer  requires  to  begin 
creating  sophisticated  software  on  this  powerful 
machine,  including  several  ready-to-type-in 
programs.  Clear,  yet  comprehensive 
documentation  and  examples  cover  advanced 
BASIC  commands,  designing  graphic 
applications,  generating  sound  and  music,  using 
the  Amiga's  built-in  speech  synthesizer, 
creating  a  user  Interface,  and  programming  the 
computer's  peripherals.  There  is  a  disk 
available  which  includes  the  programs  In  the 
book,  S!5,95.  dune  release! 
S 1 6.95     ISBN  0-87455-045-9 


Look  for  these  books  at  your  local  book  or  computer  store. 

Or  order  directly  from  COMPUTE!. 

Call  toll-free  1-800-346-6767  (in  NY  212-887-8525). 
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COMPUTEI'S  Beginners  Guide  to 
the  Amiga 

Dan  McNeill 

Written  in  a  lively  and  entertaining  style,  this 
book  teaches  you  everything  a  beginner  needs 
to  know  to  get  started  quickly  with  the  Amiga 
from  Commodore.  You  wilt  learn  about  setting 
up  the  system,  all  the  most  popular  types  of 
software,  and  details  about  the  hardware. 
SI 6.95     ISBN  0-87455-025-4 


Inside  Amiga  Graphics 

Sheldon  Leemon 

The  Amiga,  Commodore's  powerful  new 
computer,  is  an  extraordinarily  impressive 
graphics  machine.  Easy  to  use,  the  Amiga  can 
produce  color  graphics  and  excellent  animation 
You'll  find  thorough  descriptions  of  the 
computer's  abilities  and  the  hardware  required 
to  create  a  complete  graphics  system.  Software, 
too,  is  central  to  the  Amiga's  power,  and 
complete  tutorials  show  you  how  (o  get  the 
most  from  the  machine,  dune  releasel 
S 1 6 .95     ISBN  0-87455-040-8 


COMPUTEI'S  Kids  and  the  Amiga 

Edward  H.  Carlson 

The  latest  in  this  bestselling  series  written  by 
Edward  Carlson,  COMPUTE!' s  Kids  and  the 
Amiga,  will  acquaint  you  with  BASIC,  Over  30 
sections — all  with  instructor  notes,  lessons, 
assignments,  and  lively  illustrations— entertain 
and  amuse  you  as  you  learn  to  program  your 
new  computer.  Clear  writing  and  concise 
examples  make  it  easy  for  anyone — children 
and  adults  alike — to  painlessly  learn  BASIC. 
IMay  releasel 
S !  4.95     ISBN  0-87455-048-3 

Please  allow  4-6  weeks  for  delivery 
after  your  order  Is  received. 
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Part  Of  ABC  Consumei  MOuazsnes.  inc 
One  o'  'he  ABC  PuDiiining  Co^T^panies 
87&  ?ih  Avenue,  «in  Floor  New  voiit.  f^v  )iD019 
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COMPUTE!  books  are  available  in  the  U.K..  Europe,  the  Middle  East,  and 
Africa  from  Holt  Saunders,  Ltd.,  t  St.  Anne's  Road,  Eastbourne,  East 
Sussex  BN2I  3UN,  England,  and  m  Canada  from  JMcGraw-Hiil,  Ryerson  Ltd., 
330  Progress  Ave.,  Scarborough,  Ontario,  Canada  MIP  2Z5. 


Tom  Hudson,  designer  of  Bafteries  Included's  Degas  for  the  Atari  ST,  used  the 
product  to  create  this  picture. 


pictures.  Electronic  Arts  has  re- 
leased Deluxe  Paint  for  the  Amiga,  a 
very  sophisticated  paint  program. 
Beyond  the  usual  features.  Deluxe 
Paint  has  a  special  palette  window 
that  lets  you  easily  mix  any  combi- 
nation of  the  Amiga's  4,096  colors. 
With  color  cycling,  you  can  make 
parts  of  the  picture  appear  to  move, 
like  a  waterfall  flowing  or  Christ- 
mas lights  twinkling  on  a  tree. 
Brush  size  can  vary  from  a  single 
pixel  to  a  full  screen,  and  any  piece 
of  a  picture  can  be  picked  up  and 
used  as  a  brush.  Deluxe  Paint  retails 
for  $99.95, 

The  next  step,  logically,  is  soft- 
ware which  can  take  a  static 
screen  picture  and  add  anima- 
tion. This  is  an  extremely  complex 
procedure  that  taxes  the  power  of 
even  the  fastest  of  today's  personal 
computers.  But  even  though  the 
kind  of  animation  seen  in  Saturday 
morning  cartoons  is  still  a  few  years 
away,  you  might  be  surprised  at 
what  can  be  done  already. 

Fantavision,  from  Brederbund, 
is  so  easy  to  use  that  you  can  turn 
out  an  animated  sequence  in  a  few 
minutes.  It  incorporates  the  same 
kind  of  user  interface  adopted  by 
many  drawing  programs — you  pick 
up   icons   on   the   border   of  the 
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screen,  move  to  the  drawing  surface 
and  work,  then  move  back  to  the 
border  to  change  functions.  When 
you've  finished  each  frame,  you 
save  it,  then  move  on  to  the  next. 
When  you're  done,  you  execute  a 
command  that  runs  the  sequence. 
Fantavision  employs  an  unusu- 
al animation  technique.  In  the  past, 
conventional  animation  has  re- 
quired artists  to  draw  each  frame  of 
a  sequence  when  there  is  the  slight- 
est change.  It  takes  thousands  of 
drawings  for  even  a  short  piece  of 
animation.  But  Fantavision  uses 
tweeyiing,  a  process  that  automati- 
cally fills  in  the  transitional  frames, 
making  the  sequence  run  smoothly. 


This  still  shot  from  BrMerbund's  Fan- 
tavision gives  you  an  idea  of  what  the 
program's  palette  allows  you  to  do.  Its 
real  power,  though,  lies  in  its  incredibly 
easy-to-use  animation  features. 


In  effect,  you  tell  the  program 
where  to  start  and  end,  and  it  fills  in 
the  middle.  Fantavision,  available 
for  Apple  Il-series  computers  with 
at  least  64K,  retails  for  $49.95. 

Movie  Maker,  designed  by  In- 
teractive Picture  Systems  and  pub- 
lished by  Electronic  Arts,  is  a  bit 
more  complicated  to  use,  but  the 
payoff  is  more  sophisticated  anima- 
tion. So  sophisticated,  in  fact,  that 
some  professional  animators  use  it. 

Using  Movie  Maker,  you  can 
produce  an  animated  sequence 
composed  of  up  to  300  frames,  with 
up  to  six  video  tracks  and  three 
sound  tracks.  The  program  consists 
of  four  main  areas.  In  Conipose,  you 
create  files  of  characters  and  back- 
grounds. Record  asks  you  to  recall 
those  files  and  order  them  in  the 
sequence  you  want,  adding  sound 
where  appropriate.  Smooth  auto- 
matically   rounds    off    the    rough 


Deluxe  Paint,  from  Electronic  Arts,  was 
one  of  the  first  products  shipped  for  the 
Commodore  Amiga.  This  scene,  created 
with  the  product,  illustrates  the  sophis- 
ticated shapes  and  shading  possible. 


Commodore  64   ($34.95),   Atari 
($32.95),  and  Apple  ($39.95). 

The  Graphics  Magician,  de- 
signed by  Polarware  and  published 
by  Penguin  Software,  is  actually 
two  programs.  The  Graphics  Magi- 
cian Painter  lets  you  draw  pictures 
and  save  them  in  a  very  compact 
format  on  disk;  The  Graphics  Magi- 
cian Animator  animates  them.  It's 
$59.95  for  the  Apple  II  series  and 
$79.95  for  Macintosh. 

At  this  point,  the  way  to  create 
the  most  lifelike  graphics  on 
personal  computers  is  to 
make  digital  images  of  real  objects. 
Computereyes,  from  Digital  Vision, 
Inc.,  lets  you  feed  an  image  from  a 


videocassette  recorder,  video  cam- 
era, TV,  or  any  other  video  source 
into  a  computer  and  digitize  it  on 
the  screen.  The  image  can  then  be 
incorporated  in  a  game  or  dumped 
to  a  printer.  (An  upgraded  version 
of  Computereyes  that  makes  it  com- 
patible with  both  The  Newsroom 
and  The  Print  Shop  can  be  pur- 
chased for  $15.)  The  Computereyes 
software  is  sold  both  separately  and 
as  part  of  a  package  along  Vi'ith  a 
black  and  white  video  camera. 
Computereyes  is  available  for  the 
Commodore  64,  Apple,  and  Atari 
($129.95;  $399.95  with  video  cam- 
era) and  IBM  PC  family  ($249.95; 
$519.95  with  camera). 

Two  peripherals  which  have 
been  announced  for  the  Amiga 
allow  video  mixing  and  digitizing. 
The  Genlock  mixes  external  video 
signals  with  the  computer's  own 
video,  and  the  Amiga  Live  digitizer 


Powerful  personal  computer  software  is 
closing  the  gap  between  what  an  artist 
can  do  with  state-of-the-art  drawing 
tools  and  what  a  photographer  can  do 
with  a  camera.  This  ring  was  created 
using  Amiga's  GraphiCraft  program. 
(Courtesy  of  Commodore-Amiga  and  artist 
Jack  Haeger.) 


edges,  and  Play  runs  the  movie. 
Movie  Maker  is  available  for  the 
captures  external  video  images  in 


Pawn,  a  new  graphics  and  text  adventure  from  Firebird  Licensees,  Inc.,  contains 
numerous  sharp  images  like  this.  The  program's  graphics  were  developed  using 
Neochrome,  a  graphics  package  included  in  the  Atari  520  ST's  development  system. 


color  and  in  realtime.  Hippopota- 
mus Software  has  announced  a 
black  and  white  digitizer  for  the 
Atari  ST,  with  plans  for  an  Amiga 
version  later. 

As  technology  advances,  a  de- 
bate rages  over  two  issues  related  to 
computer-generated  art.  First,  will 
these  sophisticated  tools  mean  that 
anyone  can  be  an  artist?  Some  peo- 
ple feel  they  could  compete  with 
traditionally  trained  artists  if  they 
had  the  right  tools.  They  feel  that 
they  lack  only  the  mechanical — not 
the  artistic — abilities. 

Second,  can  a  computer  ever 
be  creative  in  the  same  way  human 
beings  are?  Will  it  ever  be  the  artist, 
and  not  just  an  artists's  tool?  No 
one  knows  yet,  but  if  the  evolution 
of  computer  graphics  continues  at 
the  pace  it's  been  going,  it  may  not 
be  too  many  years  before  we  have 
some  answers. 


For  More  Information 

To  learn  more  about  any  of  the 
products  mentioned  here,  contact: 

Batteries  Included 
30  Mural  Street 
Richmond  Hill,  Ontario 
Canada  L4B  1B5 

Br0derbund  Software 

17  Paul  Drive 

San  Rafael,  CA  94903 

Digital  Vision 
14  Oak  Street 
Suite  2 
Needham,  MA  02192 

Electronic  Arts 
2755  Campus  Drive 
San  Mateo,  CA  94403 

Firebird 
P.O.  Box  49 
Ramsey,  NJ  07446 

Penguin  Software 
830  Fourth  Avenue 
P.O.Box  311 
Geneva,  IL  60134 
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From  a  simple  floor  plan  to  the  most 
complex  electronic  circuitry,  comput- 
ers arc  changing  the  worlds  of  design 
and  engineering  in  virtually  every 
field.  Formerly  the  sole  province  of 
mainframe  computers  and  expensive 
graphics  terminals,  sophisticated 
computer-aided  design  (CAD)  soft- 
ware is  now  available  for  a  wide  vari- 
ety of  personal  computers.  Even  for 
casual  users,  CAD  programs  are  prac- 
tical design  tools  that  can  also  be 
entertaining  and  educational. 


In  an  automobile  factory,  a  design 
engineer  puts  a  new  axle  through 
a  series  of  stress  and  endurance 
tests.  In  an  aircraft  plant,  another 
engineer  studies  how  a  break- 
through in  fuselage  design  im- 
proves the  agility  of  a  jet  fighter. 
And  in  the  civil  engineering  depart- 
ment of  a  n-iajor  city,  a  highway 
planner  examines  how  a  new  thor- 
oughfare changes  the  urban  land- 
scape. 

Yet,  all  of  these  projects  are 
merely  sketched  in  phosphor  on 
computer  screens.  The  axle,  the  fu- 
selage, and  the  highway  have  never 
been  constructed.  But  the  com- 
puter-aided designs  are  so  accurate 
that  they  won't  have  to  be  built 
until  they've  been  thoroughly  ana- 
lyzed and  tested. 


Each  year,  engineers  and  de- 
signers save  millions  of  dollars  in 
time  and  effort  by  modeling  new 
projects  with  a  computer  before  ac- 
tually manufacturing  them.  In 
high-risk  endeavors,  such  as  air- 
craft design,  lives  can  be  saved  by 
discovering  design  bugs  on  a  com- 
puter monitor  rather  than  watching 
them  appear  at  30,000  feet.  Wheth- 
er today's  designers  are  creating 
new  shoes  or  rockets,  they're  find- 
ing that  computers  dramatically 
change  the  way  they  work. 

Up  to  recently,  however,  these 
complex  CAD  projects  could  be  ac- 
complished only  with  expensive, 
powerful  mainframe  computers  and 
dedicated  graphics  work  stations. 
Microcomputers  simply  lacked  the 
memory,  screen  resolution,  and  so- 
phisticated software  to  let  them  be- 
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BATTERIES  X&^   INCLUDED 


problem-solving  spreadsheet  program  with  built-in 
templates  for  the  most-needed  home  and  business  applications 
-  including  income  lax,  budgets  and  many  more. 

professional-quality  graphics/charting  and 
statistical  analysis  package  turns  your  data  into  superb 
visuals. 


FOR  1986 


FOR  THE  AMIGA,  ATARI  ST  and  IBM/MS  DOS  SYSTEMS. 


home  database 
managers.  |8  programs 
including  Home  Inventory, 
Recipes,  CheckBook. 
Address  Book,  Audio/ 
Video  Catalogue  and  more) 


10  Mura/ Street 
Richmond  Hill,  Ontario 
.48  IBB  CANADA 
416)881-9941 
ISlex:  06-21 -B290 


BATTERIES  W^  INCLUDED 


"The  Energizi 


Sky  Park  North,  Suite  fl 

Irvine,  California 

USA  92714 

1416)881-9816 

T&lex:  509-139 


WRITE  TO  US  FOR  FULl  COLOUR  CATALOGUE  ot  out  products  for  COMMODORE,  ATARI,  APPLE  and  IBM  SYSTEMS. 

FOR  TtCHNICAL  SUPPORT  OR  PRODUCT  INFORMATION  PLEASE  PH0^£  |41B)  881-9816. 

SOtHE  PROGRAMS  ARE  NOT  AVAILABLE  FOR  AU  SYSTEMS. 

Commodore,  Apple,  Atari  andlBM  PC  are  registered  trademarks  of  Apple  Compuiers.  Inc.,  Atari,  Inc.,  Conmndore  Business  Machines,  Inc. ,  and  Inlernational  Business  Machines,  respectively 


A  computer -aided  design  created  with  Aegis  Draw  on 
the  Amiga. 
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Aegis  Draw  uses  the  Amiga's  multitasking  capability  to 
permit  more  than  one  onscreen  window  to  be  used 
actively  in  a  CAD  project. 


A  design  created  on  the  Commodore  64  with  CADPAK 
(Enhanced  Version)  from  Abacus  Software. 


gin  to  approach  such  tasks. 

But  that's  changing,  thanks  to 
computers  like  the  Apple  Macin- 
tosh, Atari  ST,  and  Commodore 
Amiga.  Already  there  are  numer- 
ous professional  CAD  programs  for 
the  IBM  PC  family,  though  the  PCs 
may  have  a  difficult  time  keeping 
up  with  the  CAD  capabilities  of  the 
newer  computers  in  the  future.  The 
Amiga  in  particular,  with  its  versa- 
tile graphics  and  built-in  multitask- 
ing, offers  considerable  power  to 
CAD  users.  Simpler  CAD  work  can 
even  be  done  on  some  eight-bit 
computers  with  good  graphics  sys- 
tems, such  as  the  Commodore  64 
and  Atari  400/800/XL/XE  series. 
The  variety  of  CAD  projects  is 
virtually  limitless — flow  charts, 
family  trees,  building  designs, 
neighborhood  maps,  floor  plans, 
architectural  drawings,  circuit  de- 
signs, topographical  maps,  land- 
scaping plans.  All  of  these  tasks, 
and  many  more,  are  being  accom- 
plished every  day  with  micro- 
computers. 

Advanced  CAD  programs  for 
personal  computers  share 
many  basic  concepts, 
though  the  execution  and  ease  of 
use  varies  from  program  to  pro- 
gram. Whether  these  programs  use 
the  keyboard,  a  light  pen,  mouse,  or 
some  other  input  device,  they  re- 
duce the  tedious  and  repetitive 
work  that  has  traditionally  imped- 
ed the  design  process. 

A  few  common  features  of 
CAD  programs  include: 

•  Libraries  of  predrawn  im- 
ages: When  you  need  to  use  images 
specific  to  a  particular  type  of  de- 
sign— whether  an  office  building,  a 

landscaped  yard,  a  plumbing  lay- 
out, or  a  circuit  board — why  waste 
time  creating  them  from  scratch? 
Templates  and  libraries  of  pre- 
drawn images  can  offer  everything 
from  a  door  or  window  to  a  steel  I- 
beam,  circuit  gate,  or  tree. 

•  Zoom  and  scroll  commands: 
Create  a  design  larger  than  your 
computer  screen,  then  scroll  any- 
where over  that  image.  Zoom  in  on 
the  smallest  aspect  of  any  design 
for  detailed  work,  and  then  see  in- 
stantly how  it  affects  the  work  as  a 
whole. 

•  Drawing  commands:  Unlike 
many   computer   paint   programs, 


28     COMPUTEl      May  1966 


LyJLr  liU  LI  UlL 
It's  only  a  phone  call  away. 


MacTalk:  Telecomputing  on 
the  Macintosh 

Sheldon  Leemon 
Arlan  Levitan 

A  complete  guide  to  telecomput- 
ing on  the  Macintosh  from  choos- 
ing a  modem  and  software  to 
accessing  infomiation  services  and 
electronic  bulletin  boards. 
$14.95     ISBN  0-942386-85-X 


MACTALK 


3*Uu  I'  iawncii  w(J  Mat  LffvWn 
■McM  and  *»cfeanjc  bArtn  DocKK 


COMPUTE!  s  Telecomputing 
on  the  IBM 

Arlan  R.  Levitan 
Sheldon  Leemon 

The  ins  and  outs  of  telecomputing 
on  the  IBM  PC  or  PCjr,  selecting  a 
modem  and  evaluating  terminal 
software,  how  to  go  online  with 
the  major  information  services. 
$14.95      ISBN  0-942386-96-5 


COHPUTEl's 

ITELECOMPUTINGI 

ON  THE 


MOi  1^.  l£fAai  tnJ  3heldcji  iHmcn 


COMPUTEi's  Telecomputing 
on  the  Commodore  64 

Edited 

Introduces  readers  to  telecommu- 
nications, with  sections  on  buying 
and  using  modems,  accessing 
information  services  and  bulletin 
boards,  and  uploading  and  down- 
loading files.  There  is  also  a  disk 
available  which  includes  the  pro- 
grams in  the  book. 
$12.95      ISBN  0-87455-009-2 


COMPUTEf's 

TELECOMPUTING 

ON  THE 

COMMODORE 

64 


Telecomputing  lets  you  call 
up  computers  around  the 
world  through  a  network  of 
telephone  lines. 

To  get  you  started  in  tele- 
computing, COMPUTE!  Books 
offers  you  five  top-selling  books. 
Written  for  the  Apple  ll-series, 
Commodore  64,  IBM  PC  and 
PCjr,  and  Macintosh,  the  books 
give  you  all  the  information  you 
need,  from  selecting  software  to 
dialing  large  databases. 

To  order  your  complete  guide  to 
telecomputing,  give  us  a  call. 
In  the  U.S.,  call  toll  free 
1-800-346-6767  (in  NY  call 


COMPUTE!  Publicationsjnc.® 

One  ot  me  ABC  PuDiishmg  Compcmes  ^^^^ 


COMPUTEI'S  Personal 
Telecomputing 

Don  Stoner 

This  comprehensive  general  guide 
to  the  world  of  telecomputing 
shows  how  to  access  databases, 
receive  software,  and  commu- 
nicate with  others  using  a  personal 
computer. 
$12.95      ISBN  0-942386-47-7 


Personal 
Telecomputing 


COMPUTEi's  Guide  to 
Telecomputing  on  the  Apple 

Thomas  E.  Enright 
Joan  Nickerson 

Anne  Wayman 

An  informative,  easy-to-understand 
guide  to  telecomputing  on  the 
Apple;  covers  everything  from 
selecting  hardware  and  software  to 
accessing  large  databases. 
$9.95      ISBN  0-942386-98-1 


cowinn 


cotrcuTwi  •'I'HVwrAW 


COMPUTE!  books  are  ovallable  in  the  U.K.,  Europe,  Ihe  Middle 
East,  and  A(rlca  from  Hoi!  Saunders,  Ltd.,  1  St.  Anne's  Road, 
Eastbourne.  East  Sussex  BN21  3UN.  England. 
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ATARI 

130X6 CALL 

6SXE  .         CALL 

BOOXL  ...  CALL 

5Z0ST -,    -CALL 

tOSODrtVB 145 

1027  Printer 145 

&50  Interlace 1D9 

SF314  Drive 229 

SfSM  Ort»e 179 

SmB04  Printer 199 

Atari  Wrilar  ROM  33 

Atari  Writer  PLUS  3G 

ATARI 

VIP  Professional 74.S0 

STCompanton T5.95 

ATARI  SOFTWARE  (NEW) 

Codev^riler 3S.75 

Fitewnlcr -.20.75 

Reportwfiler.... 20.75 

Menuwnter 20.75 

Home  Integrator 19.75 

Small  Bus,  Inventory 11.75 

Salesman  Expenses 11.75 

Aces  Rec/Pay 11.75 

Retail  Invoice 11. 7S 

Final  Legacy 15.75 

Adventure  Writer 18,76 

INFOCOM  (520ST) 

Wistibrinaor 28.95 

ZorkI 28.95 

Zorkll 31.95 

Zoflilll 31.95 

Deadline 33.95 

Slareross 33.95 

Suspea... 31.95 

Suspended 33.95 

Cutthroats,-.- 28.95 

Sea  Stalker 28.95 

Infidel 31.95 

Sorce/er 31-95 

Enchanter. 2B,95 

Witness 28,95 

Planeitall 28.95 

Speliareaker 33.95 

SPINNAKER 

Delta  Drawing  floom 19.95 

Cosmic  Lite  Room 19.95 

Up  for  Grabs  Room 19  95 

PERSONAL  PERIPHERALS 

Super  Sketch  C-64 29  95 

Pnnier  Utility  C-64 K99 

Super  Sketch  Alan ?595 

Supei  Siietch  Apple/lbm 55,00 

SUB  LOGIC  (Atari) 
Flight  Simulator  ll.,..$Z.fS 

Ni^I  Mission  Pinball 20.75 


BRODERBUND  (Atari) 


The  PrrnlShop 

28-95 

Graptiics  Library 

18.9S 

Graptiics  Litjrary  1 

19-50 

Graptiics  Ljbtary  1 

19.50 

Bar^k  St-  Wnler 

42-75 

Whistler's  Brother 

16.93 

Spelunker 

18.95 

Stealin 

18.95 

Serpent's  Star 

24.95 

Mask  o(  the  Sun 

24-95 

ACTIVISION 

(ATARI) 

Hacker    .    .  . 

15  75 

WindShadow 

.15,75 

Ghostbusiers 

-       15.75 

Greal  Am   Rece 

15.75 

MICROPROSE  {Atari) 

Kennedy  Approach 21.75 

Crusade  in  Europe 24  75 

Decision  in  Desert 24.75 

Solo  Flight 20,75 

Nalo  Commander 20,75 

Spitfire  Ace ia.7S 

F-1S  Strike  Eagle 20.75 

ACTIVISiON  (5Z0ST) 

Borrowed  Time            ...  £9.75 
Hacker  26.75 


VIP  TECH 

VIP  Prolessional  520ST    .115 
VIP  LITE  520St  -  65 

VIP  Professional  Amiga       129 

HABA 

10  Megabyte CALL 

Hippo  C  Compiler 49.95 

Check  Minder 49.95 

Business  Letters 36.95 

Wills 36,95 

PIacal-vadic 

2400f«  ,549 

2400PA  799 

2400V  559 

t20DPC  329 

aOOV  205 

300PC  159 

TELE  LEARNING 

Totat  Tetecornmunical]Ons 
(&64)  .  29.95 

AP.2SO(300  BauU  Apple)  69.95 
IB-2$0  1300  Bauil  IBM)      S9  95 


ACTIVISION  (APPLE) 

Aller  Ego      2B.75 

Ghoslbusters  2475 

Little  People  24  75 

Space  Shuiiie  24.75 

MmaShabow  24.75 

SCARBOROUGH  (Apple) 

NET  WORTH 48.75 

Improved  Maslerlype 22.75 

Mastertype  Filar 22.75 

BRODERBUND  (Apple) 

The  Print  Shop 31.50 

Graphics  Library 18,50 

Graphics  Library  II 18.95 

Paper  Refill 11.95 

Bank  St  Writer  64K 41,50 

Bank  St  Writer  128K «.75 

Bank  St  Filer 42.75 

Bank  St  Mailer 42.75 

Bank  St  Spoiler 42.75 

Carmen  Sandiego 22.75 

Karaieka 22-75 

Captain  Goodnight 22-75 

Muppey  Cruise    25-75 

SUB  LOGIC  (Apple) 

Flight  Simulator  II....32.7S 

NigTil  Mission  Pinball 20,75 

MICROPROSE  (Apple) 

Crusade  in  Europe 25.75 

Decision  in  Desert.. 25.75 

F-15  Strike  Eagle 21.75 

Nato  Commander 21.75 

AcroJel - 21.75 

Silent  Service 21.75 

Gunship 21.75 

INNOVATIVE  CONCEPTS 

Fhp-n-File  10 3.50 

Flip-n-File  15     8.25 


ANCHOR 

Volksmooem 
VolKsmoctem  12 


MODEMS 

us  ROBOTICS 

Passwoiil  12aOM  '^29 

Passvionl  UOar-  229 

Passmnl  30t)M  139 

Passyiwa  300F  139 

Aiitodial  2I2A  .  359 

1^M5 319 

PCMH  519 

PCM256  769 

S-100  ,  379 

Courier .  469 

Mloolink  469 

TelpK  Ms-DOS  .79 


sakata 

SG  1C30  12'  Green 99 

SA  lODO  12"  Amber H!9 

SG  ISOO  12'  Green  TTL..-119 
£A  1500  1,1"  Amber  TTL..129 
£C  100  13  Color  Cofflp  209 
SC  200  13"  RGB    ■  389 

STSl  Till  Sland  29 

PRINCETON  GRAPHICS 

MAX-lS  Amber 
•lX-12  RGB 


taxan 

115  12'  Greeen  Composite  CALL 

116  12'   Amber  CDrnpo5i1e  CALL 

121  12'  GieenTTL  135 

122  12-  Amber  TIL  US 
220  14'  CKor  Composiii  259 
ilO  12'  RSSHiReslBM  329 
«0  12'  flGB  Super  Hi  IBM,  409 
440  12-  RGB  Ullia  H.  Bes  555 
Till  SlB-  35 

teknika 

MJ'iQ  Composiie  179 


COMMODORE 

MPSliJOO  Punier  ..      .259 

C1350  Mouse  12 

C170O128KRAM 145 

C17S0S12KFWM 269 

JANE 35 

Pertecl  Wnler....... 49 

PertertCalc 49 

Pertecl  Filer   <19 

ACTIVISION  (AMIGA) 

Hacker ,  26,75 

MindShadow  26  75 

BorrowecJ  Time  26.75 


xetec 

Super  Graphix  64  ,64 

Super  GraphixJH&4  ,        45 

Super  Gr^phix  Aiari  .  .  43 

Fonl  Waster  It  54  .  .29 


ACTIVISION  (C-64/128) 

Alter  Ego  28.75 

Hacker  IB. 75 

Little  Pebplc  20  75 

Gamemaker  24.75 

Sorrowed  Time  18  73 

Space  Bliullle  16.75 

r,(irdShadow  18.75 


MICROPROSE  (C-64) 

Kennedy  Approach 21.75 

Crusade  in  Europe 24.75 

Decision  in  Desert 24.75 

Solo  Flight 20.75 

Nato  Commander-- 20.75 

Spitfire  AcD IB. 75 

F.15  Slril!e  Eagle 20.75 

Hellcat  Ace 18.75 

SUB  LOGIC  (C-64) 

Flight  Simulator  II. ...32.75 

Night  Mission  Pinball 20.75 

COMTEL 

Enhancer  2000  lc-64)  179 


CARDCO 

Digitizer  Camera 139.95 

32K  Printer  Buffer 59.95 

Numeric  Keypad 34.95 

CB/5  5-slot  Board(64).,. .54.00 
CB/2  2-slol  BQard(64).,. ,25,00 

S'More  Basic  Rom 49,95 

Write  Naw.64 35.00 

Mail  Now-64 29.00 

Spell  Now.64 29.00 

File  Now-64 29.00 

Paint  Now-64 29.00 

Calc  Now.64 .29.00 

Tax  Survival 29.00 

Super  Printer  Utility 27,95 

Write  Now-Vic-20..,. 29.95 

BATTERIES  INCLUDED 

Paper  Clip 59.95 

Spell  Pak 34.95 

Consultant 59.95 

Paper  Clip 

w/Speil  Pak 75.95 

Home  Pak 34.95 

Bus  Card 129.95 

80  Column  Board 109.95 

Graphics  Library 18.75 

eraphics  Lrbraryll . . .  19.75 
raph  cs  Library  III ...  1 9.95 

Karateka 19.75 

Castles  Dr.  Creep  ...  19.75 

Bank  St.  Writer 32.75 

Loderunner    10.75 

Mask  of  the  Sun 24.75 

SpDiunker 19.75 

Serpent's  Star 24.75 

Whisiler-sBfOlher...  18.75 


NOVATION 

IBM  3(XVl200  MSO(3S  CKl 
ISM  30011201  CPM.«6  em 
IBM  3<mi2(XV2400  em 
ISM  30(l'12a(V2«X  M&OOS 
IBM  lil&OOS  ml. 
BM  CPMW  mi 
Macmmm  3!XV12(» 


319 
319 
529 
579 
325 
32S 
31S. 


3.5"  DISKETTES 


HAYES 

SrTianniodeTn  300. 
Smanmodem  1200 
Smanmodem  12006   . 
Smartmgdem  24<10 
Mciomodem   HE 


133 
377 
.347 
S9S 

135 


3  5' 
I  3.5' 


3,5' 
3.5' 


DENNISON 

'  SSDD  ...5  pak  ,  ...  14.95 
■SSDD....)Opak... .26.95 

MAXELL 

SSDD.    ..lOpaK.... 29.95 
'  DSDD...    10  pak.  ...36.95 

3M 

SSDD...  10  pak.. -26.95 
■DSDD 10  pak... -32.95 


MONITORS. 


PANASONIC 

□TiaOOD  13''  RGBJComposle...,247 
tXHWi  14-  BGaCwnposle  -329 
DTH103    W  RGB  H'  Res  395 

DTSlOl     10"  Composle  175 

DTICOOG  ID    Hai 166 

TX12H3P  IJ-  Cow     ,  ,419 

IflllOMlPA  12-  Green  ,109 

TRlJOWBP*  12'  Amtw  .109 

ini22M9P  12'  Green  BM  I4a 
IRlJJMYP    12'  /taw  ISM.      laa 


1 

zenith 

AMDEK 

300  Green 

lie 

Zva  122A  AmtMf    ,    . 

75 

300  Amber 

..128 

2VM  123G  Green     .    . 

75 

310  Amber  IBM 

,  -  155 

ZVW  124  AmbeilBM    . 

....129 

Color  300  Audio 

...234 

ZVM  131  Color 

-  -275 

Color  ^00  Composite... 

,,,.369 

ZVM  133  RGB      . 

.397 

ZVM  1 35  CompMile 

449 

Co  for  70O 

495 

ZVM  ISG  Hi  Res  Color 

589 

ZVt^  1220 
ZVM  1230 

95 
95 

NEC 

ZVM  1240 

1J9 

JB.1260  Green    

..    -.95 

JB-lSOl  Green 

-  .135 

JC  12«5  Color 

....s:-5 

LYCO  COMPUTER 
MERICA'S  MAIL  ORDER  HEADQUARTERS! 


^yco  Compute/t  Jiiaitkei'mg  &  Comuita(/\h 

SAVE  ™  PRINTERS 


1091 


$228 


DIGITAL  DEVICES 


JUKI 


16K  BUPFER 
32K  SUFFER 
eJK    BUFFER, 


.89 

.125 


SEIKOSHA 

SP-IOOOUC  (C-64) 
SP-1000ACemroni- 


.  169 
.  185 


CITIZEN 

MSP-IO. 
MSP-15 

MSP-20 

MSP-25 


255 
356 
.337 
.495 


CORONA 

LP300  Lasef  Printer :2686 

J00361  Toner  Carlridge..    .89 


C.  ITOH 

Prowfiter  8SiOsp<-  Cal 

1S505SP+  Call 

Prinrmaster  Call 


TOSHIBA 


P13J0 

P351t 

P341P 

P341S 

351  Steel  Feeder . 


.469 
1149 


EPSON 

Lxao  209 

FXSS  333 

JX80 Call 

Homewriter  10  ,  193 

DX10    207 

DX20      . 297 

DX35 597 

AP-80     244 

HI-80    .  355 

HS-BO  298 

FX-286  (NEW)  489 

LQ-aOO   NEVirt  ,  529 

LQ- 1000  (NEW)    .  .    ,659 


OKIDATA 

Okimaie  10 

OKimate  20. 

I8J 

192 

193 

84P  


CALL 
214 

.  J48 
-563 
-645 


BROTHER 

HR-15XLP  359 

HR-15XL-S  359 

HR.35P  B39 

HR-35S 839 

2024L-P 949 

M1009P-.-   189 


Juki   6100 344 

RSJ32  Serial  Boarfl 55 

6100  Tractor 119 

6100  Sheet  Feeder 209 

Juki   63C0 767 


LEGEND 

880 IBS 

108O Call 

1380 258 

1385        289 

808  .  , 148 

DIABLO 

025 540 

630  API 1599 

630  ECS 1759 

PBO  IF        239S 

f  32  COl  .    699 

P3e.  1749 

C  150  999 

nx.35(NEW;  CAUL 

AP-80-  CAUL 


DUST  COVERS  INTERFACING         DISKETTES  IBM-PC 

COM  RATABLE 


saosT 

i3oxe 

eooxL 

1050 
lOS 

Coinmodar^ 

Ct28 

157171541 
190S 
1702    - 
C64A'ica] 

Panasonic 

109W1D91 

1092. -. 

1093 

Star  Micronids 
SG.ISD10 
SGJSD15 
SRlO 
3H15 


AXIOM 

ATe4e  (Atari). 
Parallax  (C-64) 


.65 
.  .65 


..7-S8 
.6.89 
10.95 
S.99 
6.99 


3.99 
9.99 


MICR08ITS 


DENNISON 

cLEPHANT  5'j-   SSSD 
ELEPHAJ^T  5V-     SSDO 
ELEPHANT  Jr,  ■  dsqij 
PREMIUM  5'/;"  SSDD 
PREMIUM  S'.-l-  DSOO. 


n  S9 
12S9 
14.99 
!0.93 
15-9!j 


MPP-1150  (Aiafi) 54 

MPP-1150XL  (Atari)  ...59 

MicroPnnt  JAtan)  .  .39 

64K  RAM   Board  (600x1).     .65 

DIGITAL  DEVICES 

ApeFace  XLP  (Atari) 49 

ApeFace  12XLP  (1200x1)-  .49 

U-Print  A  (Atari) 54 

U-Print  C   (C-64) 49 

U-Prin!  Ai6K  Buffer  .  .74 
U.Prini  A64K  Buffer  .  ..  99 
U-Print  AP16K  (Apple)  99 

il-Print  AP64K  Apple)  139 
U-CALL  aS232  (Aferi  37 


VEflBATIM 

S'A"  SSDD 13.99 

5'A-   DSDD 19.99 

BONUS 

5W."    SSDD    

SKi'    DSDD 


SUNKYONG 

SKC  5Vi  ■  SSDD 

SKC  5V,~  DSDD   


6.99 
.1299 


SG-10 $205 

PANASONIC 

109 228 

3131  (NEW)       .    ,  264 

1092 325 

3151 409 

1080  (NEW).  209 

1592  (NEW)          -  -439 

SILVER  REED 

EXP400  249 

EXP500  .295 

EXP550  399 

EXP77a  749 

STAR  MICRONICS 

SO-IO  - 205 

SG-10C 219 

SG-1S, 367 

SD--'0    319 

BD-15 438 

SH-10 469 

SR-15 578 

SB-10 589 

Powerlype  - 297 


.11.99 
.13.99 


MAXELL 


DRIVES 


INDUS 

Trttiiis  GT  Alari  I9S 

GT  Commodore  209 

TYMAC 

■--■.-  «;teC-/»WiK       289 

TANDON 

■■JUJK  '«,  '-,•    Oivjh  115 

MSD 

SOl  Drive  (C-64)  .    .229 

SD2  Drive  (C-64  46S 


MICROTEK 

DymDling  GX  (Applet 
DumpfirTo  16K  (Apple) 
""  "lie  (* 


RV-e 


(Apple) 


.  59 
...89 
.49 


TYMAC 

Connection   (C-64) 
Tackier  (Apple) 
PPC-tOO  (Apple) 

ORANGE  MICRO 

GRAPPLER  t   (Appfe) 
Grappler  16K  lApplel 
ORANGE   (Apple) 
Grnppler  CD  (C  641 


.55 

.49 

39 


.85 

149 
.59 
79 


CARDCO 

G-Wti  (C-64) 
C/'  I  G  (C-64) 
CPPS  (C  B4| 

Cl'H   rC  641 


NO  LABEL  DISKETTES 

NL  5l'.i"  SSDD. ,.10.99  (Box  10} 
NL  S'.-i"  DSDD.. .15.99  (Box  1Q| 

■Free  Diskette  Wnler  Pen! 

•Free  Storage  Case! 

IBM-PC 

SOFTWARE 
ACTIVISION  (IBM) 

Sorrowed  Time  24. ?5 

GhostOuslers  24.75 

MindShadows  24  75 

MICROPROSE  (IBM) 

Fib  Slrihe  Eagle  20  75 

Stilo  FligW  .20  75 

HpUcnt  Ace  20  75 

f?r-t|(rcAcp  1875 


BRODERBUND  (IBA 

Bank  SI.  Wriler      ,  i93 

Tne  Pnn:  Shop  3^95 

Grepnjcs  Library  i  ..     22.95 

LodeHumer 22_95 

Atxierii  Art  o(  War z?,9& 

Champ  Lode  Runner 22.95 

SSI  (IBM) 

BaWkf  tot  ^Jormantly         ...2-1,^ 
KnchJs  of  Desert  ,2*j,S 

Tigers  in  Snow  ,  ?4  95 

Compulei  Bas^jaSI 2495 

Epdemic 2295 

Waip  Factor 2495 

Canels  a  Cutthroats  24  95 

SYNAPSE  (IBM)  i 

Syrisiocrk  e-i  9 

Essex  28  9 
VVtzBi-d  of  Wail  Sj 

Bnmsione  23  9 

SUB  LOGIC  (IBM) 

Jet  Simulator  34  95 

*LEADING  EDGE 

Nutshell  69.95 

LEWP  Basic    65.00 

LEWP  Merge  Print 99.00 

L£  Spell  Corredion      .169. — 

„     *QUADRAM 

Quad  Jr.  Exp  Chassis... 519.01 
Quad  Jr  Exp.  Memory.  209  00 
Quad  Memorv  Jr 209  00 

•LOTUS 

Lolus  1-2-3 309.00 

Symphony .439,00 


0^^ 


TOLL  FREE  1-800-233-8760 


TO  ORDER 

CALLTOLL  FREE  1  -800-233-8760 

in  PA  717-494-1030 
Customer  Service71 7-494-1 670 


or  send  order  to 
Lyco  Computer 
P.O.  Box  5083 

Jersey  Shore,  PA 
17740 


RISK  FREE  POLICY 

ln-sToc!<  neras  sh>ppod  wiihm  24  hours  ol  order  No  cJepDS^i  or  C  O  D  OfOers  Free 
shipping  on  prepaid  cash  orders  wiihin  itie  coniinenlal  US  Volume  diSMunis 
ava*Iabfe  PA  residents  add  sales  :&%  APO  FPO  and  jniernaiionaf  orders  add 
Sii  00  plus  2°'a  tor  priority  tnail  service   A^verlised  prices  show  d^ij  diSCOur:!  tar 

cash,  aad  4*.ti  fof  MasierCard  ar  Visa.  Personal  checks  requite  -i  weeKS'  clearance 
bcSote  shipping  Ask  abput  UPS  Blue  and  Red  laijel  snipping  All  merchandise 
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CAD  software  doesn't  require  the 
user  to  be  an  artist.  Most  CAD 
packages  incorporate  functions  for 
creating  lines,  polygons,  arcs,  cir- 
cles, rectangles,  rounded  corners, 
angles,  and  pattern  fills,  and  for 
duplicating  and  resizing  objects.  In 
addition,  built-in  rulers  and  grid 
patterns  take  the  guesswork  out  of 
precisely  placing  objects  and  text. 
•  Object-based  versus  pixel- 
based  programs:  With  a  CAD  pro- 
gram, you  can  create  and  name  a 
shape,  then  move  it  around  the 
screen,  recall  it  from  memory,  and 
reuse  it  at  will.  The  program  treats 
the  shape  as  an  object  rather  than 
as  a  collection  of  individual  pixels. 
Most  paint  programs  can't  identify 
an  image  as  an  object,  while  CAD 
packages  must  have  this  capability 
to  be  useful. 

Obviously,  there  are  many 
more  features  that  make  up  a  CAD 
program,  and  they  vary  from  pack- 
age to  package,  just  as  prices  range 
from  less  than  a  hundred  dollars  to 
several  thousand  dollars.  But  even 
the  most  expensive  CAD  programs 
for  personal  computers  cost  consid- 
erably less  than  high -end  CAD 
hardware  and  software;  advanced 
solid-modeling,  three-dimensional 
packages  can  cost  tens  of  thousands 
of  dollars. 

One  of  the  most  popular  and 
powerful  CAD  packages 
for  personal  computers  is 
AutoCad  from  Autodesk,  Inc.,  used 
by  many  professional  designers.  So 
popular  has  the  program  become 
that  there  are  dozens  of  support 
packages  which  add  a  variety  of 
specific  architectural  and  engineer- 
ing tools.  In  February,  the  first  na- 
tional convention  and  trade  show 
devoted  to  CAD  systems  for  micro- 
computers was  held  near  Chica- 
go— and  not  surprisingly,  the  show 
was  called  AutoCadCon.  It  focused 
primarily  on  the  AutoCad  package 
and  its  support  programs.  Response 
to  the  show  exceeded  expectations, 
and  the/4ufoCflrfCon  sponsors  even 
arranged  for  as  many  as  1,200  uni- 
versities across  the  nation  to  receive 
satellite  downlinks  from  the  confer- 
ence's 20  technical  sessions. 

Whether  your  interest  in  CAD 
is  professional  or  casual,  there  are  a 
growing  number  of  software  pack- 
ages at  every  level  of  price  and 
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An  office  floorplan  created  with  Apple  Computer's  MacDraw  for  the 

Macintosh. 


Creating  a  printed  circuit  board  layout  is  greatly  simplified  with 
Abacus  Software's  PCBoard  Design  for  the  Atari  ST. 


performance.  However,  it's  difficult 
to  understand  how  revolutionary 
and  how  widely  applicable  CAD 
can  be  until  you've  actually  worked 
with  one  of  these  packages.  What  is 
it  that  CAD  actually  does  for  the 
designer? 

"A  word  processor  for  draw- 
ing"— that's  how  software  designer 
William  Volk  describes  a  good  CAD 
program.  Just  as  a  word  processor 
helps  a  writer  assemble  and  edit 
words  with  unprecedented  flexibili- 


ty, CAD  programs  offer  drafting 
tools  that  are  versatile,  fast,  and 
simple  to  use.  And,  just  as  a  word 
processor  can  change  the  way  a 
writer  approaches  writing,  so  a 
CAD  package  can  alter  your  view  of 
design. 

Volk  is  the  creator  of  Aegis 
Draw,  a  sophisticated  CAD  pro- 
gram from  Aegis  Development, 
Inc.,  for  the  Amiga.  Aegis  Draw  rep- 
resents the  direction  in  which  CAD 
developers  are  headed   today. 


Getthejumponthe  weather- 
man by  accurately  forecasting 
the  local  weather  yourself! 


A  scientifically  proven  way  (o 
develop  an  awesome  memory. 


UTILITY 
AUDIT 


You  are  trapped  in  a  five- 
story,  125-room  structure 
made  enti  rely  of  ice.  Find  the 
exit  before  vou  freeze! 


Take  control  of  your  personal 
finances  in  less  than  one  hour 
a  month. 


The  beautiful  princess  is  held 
captive  by  deadly  dragons,  Only 
a  knight  in  shining  armor  can 
save  her  now! 
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Cut  your  energy  costs  by  moni- 
toring your  phone,  electric  and 
gas  bills. 


Computerize  car  maintenance 
to  improve  auto  performance, 
economy  and  resale  value. 


Create  multi-colored  bar 
graphs  with  a  surprisingly 
small  amount  of  memory. 


•oefw^kTr  °^ 


A  lime-saving  organizer  for 
coupons,  receipts  and  more. 


School -age  and  pre-schoo! 
children  are  rewarded  for  right 
answers,  corrected  on  their 
wrong  ones, 


A  real  brainflexer.  Deflect 
random  balls  into  targets  on 
a  constantly  changing  playfield. 


A  fun  way  to  dramatically 
increase  typing  speed  and 
accuracy. 


Get  up  to  20  new  programs  and  games 
every  month  in  COMPUTE! 


Every  month,  COMPUTE!  readers  enjoy  up  to 
20  brand-new,  ready- to-run  computer  pro- 
grams, even  arcade-quality  games. 

And  when  you  subscribe  to  COMPUTE!, 
you'll  get  them  all  for  less  than  15  cents  each! 

You'll  find  programs  to  help  you  conserve 
time,  energy  and  money.  Programs  like  Cash 
Flow  Manager,  Retirement  Planner,  Coupon 
Filer,  Dynamic  Bookkeeping. 

You'll  enjoy  games  like  Air  Defense, 
Boggier,  Slalom,  and  High  Speed  Mazer. 

Your  children  will  find  learning  fast  and 
fun  with  First  Math,  Guess  That  Animal,  and 
Mystery  Spell. 

Looking  for  a  challenge?  You  can  write 
your  own  games.  Customize  BASIC  programs. 
Even  make  beautiful  computer  music  and 
pictures. 

It's  all  in  COMPUTE!.  All  ready  to  type 
in  and  run  on  your  Atari,  Apple,  Commodore, 
TI-99/4A,  IBM  PC,  or  PCjr  computers. 

What's  more,  you  get  information-packed 
articles,  product  reviews,  ideas  and  advice  that 


add  power  and  excitement  to  all  your  home 
computing. 

And  when  it's  time  to  shop  for  peripherals 
or  hardware,  check  COMPUTE!  first.  Our 
product  evaluations  can  save  you  money  and 
costly  mistakes.  We'll  even  help  you  decide 
what  to  buy:  Dot-matrix  or  daisy-wheel  printer? 
Tape  storage  or  disk  drive?  What  about 
modems?  Memory  expansion  kits?  WTiat's  new 
in  joysticks,  paddles,  and  track  balls? 

Order  now!  Mail  the  postpaid  card  attached 
to  this  ad  and  start  receiving  every  issue  of 
COMPUTE!. 


For  Faster 

Service 

Call  Toil-Free 

1-800-247-5470 

(in  Iowa 
1-800-532-1272) 


COMPUTEl  P.O.  Box  10954,  Des  Moines,  lA  50340 
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A  three-dimensional  image  constructed  with  CAD-3D  for 
the  Commodore  64  (above).  Easy-Draw  for  the  Atari  ST  is 
a  structured  drawing  program  with  many  CAD  features  (on 
right). 


Piston 


"High  performance  and  ease  of 
use,"  says  Volk.  "That's  the  philos- 
ophy of  the  program.  We  wanted  to 
break  new  ground  on  that." 

Volk  and  other  CAD  develop- 
ers are  taking  advantage  of  the  new 
generation  of  personal  comput- 
ers— chiefly  the  Amiga,  ST,  and 
Macintosh — to  create  CAD  pack- 
ages that  are  far  more  sophisticated 
and  yet  less  expensive  than  previ- 
ous programs.  Faster,  more  power- 
ful microprocessors,  more  memory, 
multitasking  operating  systems,  and 
custom  graphics  chips  are  all  con- 
tributing to  an  expanded  universe 
for  CAD  developers  and  users. 

On  the  Amiga,  Volk  was  able 
to  take  advantage  of  the 
machine's  multitasking  in 
ways  that  would  be  very  difficult  or 
impossible  on  other  computers. 
"The  idea  being  that  you  should  be 
able  to  have  multiple  windows  on 
the  same  drawing  so  that  you  can 
actually  work  in  detail  on  a  drawing 
and  still  maintain  an  overall  view," 
he  says.  In  other  words,  while  one 
window  on  the  Amiga  screen 
shows  the  entire  design,  a  second 
window  can  zoom  onto  a  tiny  area 
of  the  image  for  detailed  work. 
Make  a  change  in  one  window  and 
it's  reflected  in  the  other  window  as 
well — two  windows,  both  active. 

Aegis  Draw  has  other  advanced 
features  as  well,  including  an  al- 
most infinite  level  of  zoom.  For  ex- 
ample, you  could  zoom  from  an 

34     COMPUTEI     May  1986 


image  of  the  Earth  down  to  the 
level  at  which  you  could  read  a 
car's  license  plate.  Additional  fea- 
tures include  object  rotation  as  flne 
as  .001  degree,  angling,  variable  line 
thicknesses,  and  line  patterning. 

Volk  sees  two  markets  for  his 
program  and  other  CAD  software: 
"One  is  the  vertical  application 
people — the  engineers  and  the  ar- 
chitects. And  the  other  market  is 
the  people  who  aren't  artistic 
enough  to  use  [a  computer  paint 
program]  accurately.  In  other 
words,  if  you  want  to  create  an 
organizational  chart  [with  a  paint 
program],  typically  people  are  not 
going  to  do  a  great  job.  But  if  you're 
using  Drazo,  you  can  be  rather 
clumsy  and  still  end  up  with  really 
accurate-looking  drawings." 

Although  Aegis  Draw  can  be 
used  by  both  professionals  and 
hobbyists,  Aegis  Development  has 
a  still  higher-end  package,  Aegis 
Drmu  Professional  (Pro),  that's  up- 
wardly compatible  with  Aegis  Draiu. 

One  of  the  most  popular  and 
easy  to  use  design  programs  is  Ap- 
ple Computer's  MacDraw  for  the 
Macintosh.  Although  not  aimed  at 
the  professional  design  market, 
MacDraw  and  its  companion  pro- 
gram, MacPaint,  broke  new  ground 
when  they  were  introduced.  Their 
use  of  icons,  pull-down  menus, 
command  bars,  and  mouse- 
controlled  cursor  movement  are  all 
very  well  suited  to  CAD  work.  Sim- 
ilar user  interfaces  are  becoming  a 


virtual  standard  among  programs 
for  the  Amiga  and  Atari  ST. 

One  interesting  new  CAD 
package,  both  from  a  pro- 
fessional and  educational 
standpoint,  is  a  program  for  the 
Atari  ST  that  automates  printed  cir- 
cuit board  layouts.  Called  PCBoard 
Designer,  this  $395  package  was 
originally  developed  in  West  Ger- 
many and  is  now  marketed  in  the 
U.S.  by  Abacus  Software. 

Aimed  primarily  at  the  narrow 
market  of  printed  circuit  designers, 
PCBoard  Designer  also  offers  valu- 
able hands-on  experience  for  high 
school  and  college  electronics  stu- 
dents. PCBoard  Designer  is  a  good 
example  of  how  thousands  of  hours 
of  development  time  can  be  elimi- 
nated by  a  computer  with  CAD 
software. 

In  printed  circuit  design,  there 
are  two  phases  of  work  that  require 
large  amounts  of  time,  explains 
Arnie  Lee,  president  of  Abacus 
Software.  One  phase,  called  tracing, 
is  the  layout  of  circuit  traces  from 
one  point  to  another  on  the  board. 
None  of  the  traces  can  overlap,  or  a 
short  circuit  would  result.  With 
PCBoard  Designer,  the  h-acing  is 
handled  by  autorouting — automati- 
cally routing  points  that  need  to  be 
connected  on  the  PC  board.  The 
computer  program  determines  the 
best  layout  for  the  traces  in  seconds. 

The  second  time-consuming 
phase  of  printed  circuit  design  is 


when  last-minute  changes  force  the 
technician  to  redraw  all  traces  from 
scratch.  Again,  what  might  have 
taken  a  couple  of  days  of  tedious 
tracing  and  retracing  can  now  be 
done  by  the  computer  in  seconds. 

CAD  programs  can  work  simi- 
lar wonders  for  all  kinds  of  projects. 
Whether  you're  designing  a  printed 


circuit,  compiling  a  family  tree,  or 
planning  an  office  flowchart,  CAD 
packages  are  becoming  as  easy  to 
use  and  as  powerful  as  the  new 
computers  they  run  on.  Even  the 
most  advanced  three-dimensional 
solid  modeling  will  one  day  be  as 
common  on  personal  computers  as 
two-dimensional  graphics  are  now. 


For  More  Information 

While  space  does  not  permit  a  comprehensive  listing  of  all  CAD  programs 
now  available,  the  following  should  help  you  gel  started: 


Aegis  Draw 

for  Commodore  Amiga 
Aegis  Development 
2210  Wilshire  Blvd.,  #277 
Santa  Monica,  CA  90403 
$199.95 

AutoCad 

for  IBM  PC  family,  compatibles,  and 

many  business  computers 
Autodesk,  Inc. 
2320  Marinship  Way 
Sausalito,  CA  94965 
Basic  package:  $1,000 
With  ADE2  (Advanced  Drafting 

Extension)  and  ADE3:  $2,500 

CadApple 

for  Apple  11  family  (minimum  64K) 

T&W  Systems,  Inc. 

7372  Prince  Drive 

Suite  106 

Hutuington  Beach,  CA  92647 

Entry-level  package:  $495 

CAD-3D 

for  Commodore  64 

IHT  Software 

2269  Chestnut  Street 

Suite  162 

San  Francisco,  CA  94123 

$39.95 

CadPak  (Enhanced  Version) 

for  Commodore  64 

CadPak  128 

for  Commodore  128 

Abacus  Software 

2201  Kalamazoo  S.E. 

P.O.  Box  7211 

Grand  Rapids,  MI  49510 

64  version  $39.95 

128  version  $59.95 

CadPlan 

for  IBM  PC  family  and  compatibles 

(minimum  320K) 
CalComp 

2411  West  la  Palma  Avenue 
P.O.  Box  3250 
Anaheim,  CA  92803 
$2,000 

Computer-Aided  Design  for  the  C-128 

and  C-64 
(Hands-on  introductory  book  on  CAD  for 

Commodore  64  (using  Simons' 


BASICJ  and  128) 

Abacus  Software 
2201  Kalamazoo  S.E. 
P.O.  Box  7211 
Grand  Rapids,  MI  49510 
Book:  $19.95 
Optional  disk:  $14.95 

Easy-Draw 

for  Atari  ST 

Migraph,  Inc. 

720  S.  333rd  Street 

Suite  201 

Federal  Way.  WA  98003 

$149.95 

MacDraw 

for  Apple  Macintosh 

Apple  Computer,  Inc. 

20525  Mariani  Avenue 

Cupertino,  CA  95014 

$195 

PCBoard  Designer 

for  the  Atari  ST 

Abacus  Software 

2201  Kalamazoo  S.E. 

P.O.  Box  7211 

Grand  Rapids,  Ml  49510 

$395 

PC-Draw 

for  IBM  PC  family  and  compatibles 

(minimum  256K) 
Micrografx,  Inc. 
1701  North  Greenville 
Suite  305 

Richardson,  TX  75801 
S395 

Robo  Graphics  CAD-1  -I-  and  CAD-2 

for  Apple  II  family  (minimum  64K) 

Chessell'Robocom  Corporation 

Robo  Systems 

111  Pheasant  Run 

Newtown,  PA  18940 

CAD-1 +:  $695 

CAD-2  (without  RAM  card):  $1,095 

CAD-2  (including  RAM  card):  $1,320 

VersaCad 

for  IBM  PC  family  and  compatibles 

T&W  Systems,  Inc. 

7372  Prince  Drive 

Suite  106 

Huntijigton  Beach,  CA  92647 

Entry-level  package:  $495  @ 
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^..from  the  creators 
of  MATH  BLASTER!" 


ALaE-BLASTERf 

Learn  the  abc^s  of 
a'  +  b'  =  c' 

ALGE-BLASTER!  is  the  most  com- 
plete algebra  program  ever  put  on 
hne  disk.  Master  aU  the  fundamen- 
tals: positive  and  negative  numbers, 
monomials  and  polynomials,  factor- 
ing, and  equations— 670  problems  in 
all!  Receive  step -by- step  tutoring. . , 
earn  graphic  rewards  for  right 
answers . . .  add  new  problems  with 
Davidson's  easy-to-use  editor. .  .and 
enjoy  sound  effects,  score-keeping 
and  print  features,  and  much,  much 
more.  7th-12th  grade.  Apple™  II 
family  (64K).  IBM"''  version 
available  11/85. 

Educational  Software 
That  Works. 

Davidson  &  Associates,  Inc. 

800-55fr6141 

{In  Calif.,  213-53440701 


Davidson. 


Davidson  &  Associates,  Inc. 

S136  Kashlwa  Street 
Torrance,  CA  90505 


nea" 


Please  send  me  a  FREE  COLOR  BROCHURE  and  the  name  of 
my  nearest  Davidson  Dealer. 

Name 


Address_ 
City 


.State. 


-2ip_ 


Hickory,  Dickory, 
Dock 


4i- 


Barbara  H.  Schulak 


This  fun,  educational  program  helps  children  learn  the  concepts 
of  telling  time  by  relating  a  digital  clock  display  to  a  conventional 
clock  face.  The  original  program  is  written  for  the  Commodore  64 
(and  128  in  64  mode).  We've  added  new  versions  for  Apple  U- 
series  computers,  the  IBM  PC/  PCjr,  Amiga,  Atari  520ST,  and 
Atari  400/800,  XL,  and  XE  computers. 


"Hickory,  Dickory,  Dock"  offers  an  enjoyable  way  for  children  to  learn 
how  to  tell  time.  Type  in  the  program  for  your  computer,  then  save  a  copy 
before  running  it.  Because  every  version  works  much  the  same,  read  the 
general  instructions  first,  then  refer  to  the  specific  notes  for  your  computer. 

When  you  run  Hickory,  Dickory,  Dock,  it  displays  a  round  clock  face 
as  well  as  a  digital  display.  Four  different  activities  are  available.  The  first 
option  lets  youngsters  practice  telling  time.  As  the  positions  of  the  clock 
hands  change  on  the  screen,  the  digital  clock  display  changes  as  well.  This 
shows  the  relationship  between  the  spatial  position  of  hands  on  a  clock 
face  and  the  numeric  representation  of  time. 

The  other  three  activities  test  a  youngster's  time-telling  ability  for 
hours  only,  hours  and  half-hours,  or  five-minute  intervals.  Move  the 
hands  to  the  correct  position,  then  press  RETURN  (or  Enter)  to  enter  the 
answer.   After  five   correct  answers,   the  program  plays  a  brief 
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ST 
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Elementary  Amiga  BASIC 

C.  Regena 

0-87455-041-6,  $14.95 
Disk  $15.95 


Elementary  ST  BASIC 

C.  Regena 
0-87455-034-3,  $14.95 

Disk  Si  5.95 


BASIC 

programming 
at  its  best! 


Two  new 
programming 

guides  from 

COMPUTE!  Books. 


Written  by  the  author  of  the  bestselling  Programmer's  Reference  Guide  to  the  TI'99/4A,  these  books 
introduce  you  to  the  new  anit  powerful  BASIC  on  the  Amiga  and  Atari  ST  personal  computers.  The 
computers'  impressive  graphics,  animation,  and  sound  can  be  unlocked  with  the  right  commands,  and 
BASIC  is  the  place  to  start.  Regena  shows  you  how— in  the  clear,  concise  language  that's  made  her 
such  a  popular  writer. 

Complete  descriptions  of  the  Amiga's  and  ST's  BASIC  commands,  syntax,  and  organization  take 
you  from  novice  to  full-power  programming.  Sample  programs  and  subroutines,  all  ready  to  type  in,  are 
included.  Pius,  both  books  offer  you  working  software  while  showing  you  how  to  write  your  own 
programs.  4  disk  is  also  availaltle  for  each  book  which  includes  all  the  programs  from  the  book  in  an 
easy,  ready'to-load  format. 


SPECIAL  COMBINATION  OFFER 
Order  the  book  and  disk  together  for  only  $29.95* 

You'll  find  these  new  programming  guides  and  many  more  useful,  entertaining  COMPUTE!  books  at  your  local  computer  and  book 
stores.  Or  you  can  order  directly  from  COMPUTE!  Books. 

For  the  fastest  service,  call  toll  free  1-800-346-6767  (in  NY  212-887-8525).  Or  mail  the  attached  coupon  with  your  payment  to 
COMPUTE!  Books,  P.O.  Box  5038,  F.D.R.  Station,  New  York,  NY  10150. 

Please  add  shipping  and  handling  charges  to  all  orders:  In  U.S.,  $2.00  per  book,  disk,  or  combination  package;  $5.00  per  item  airmail. 


r" 


I  want  the  best  in  BASIC  programming  guides.  Please  send  me: 

Elamantary  ST  BASIC.  (034-3),  $14.95  each 

Elamoniary  ST  BASIC  Disk,  $15.95  each 

Elementary  ST  BASIC  disk  and  book  combination.  $29.95 

Elementary  Amiga  BASIC,  (041-6),  $14.95  each 

Elementary  Amiga  BASIC  Disk,  $15.95  each 

Elementary  Amiga  BASIC  disk  and  book  combination.  (057-2),  $29.95 

Subtotal 


n 


AIL  OROEfiS 

Must  BE 
PREPAID  IN 
U.S.  fUNDS 


NC  residents  add  4.5%  sales  tax 
Shipping  charges 
(S2.00  per  Itefn  In  U.S.  and  surface  mall; 
SS.OO  per  Item  airmail) 
Total  amount  enclosed 


D  Payment  enclosed  (check  or  money  order) 

D  Charge     D  MasterCard     D  Visa     D  American  Express 


Accoun!  No. 
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Address 
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Exp.  Date  . 
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Allow  4-6  weeks  for  delivery. 


.Zip. 


COMPUTE!  Publcationsjnc,^ 


Port  ot  ABC  COAiLunef  Maoazinei.  inc 
One  of  tne  ABC  Publishing  ComDanies 
S2S  7tri  Avenue,  fiin  fioof.  New  Yotk  MY  10019 


COMPUTE!  books  are  available  in  the  U.K.,  Europe,  ttie  Middle  East,  and  Africa  from 
Holt  Saunders,  Ltd.,  1  St.  Anne's  Road,  Eastboume,  East  Sussex  BN21  3UN,  England 
and  tn  Canada  from  f(/lcGraw-Hill,  Ryerson  Ltd.,  330  Progress  Ave.,  Scarborough, 
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song  and  displays  sonne  graphics  as 
a  reward.  After  three  incorrect 
choices,  the  program  automatically 
moves  the  clock  hands  to  the  cor- 
rect position. 

In  the  Commodore  64  version 
(which  also  works  on  the  128  in  64 
mode),  press  the  17  function  key  to 
move  the  minute  hand  (the  long 
green  one),  and  the  f5  function  key  to 
move  the  hour  hand  (short  and  yel- 
low). If  you  press  M  at  any  point,  the 
program  returns  to  the  main  menu, 

For  all  Atari  versions  (includ- 
ing the  ST),  press  the  H  key  to 
move  the  hours  hand,  press  M  to 
move  the  minutes  hand,  and  press 
Q  to  return  to  the  main  menu. 
Before  running  the  Atari  ST  ver- 
sion, you  should  select  Low  Resolu- 
tion from  the  Preferences  menu  and 
turn  off  buffered  graphics.  (If  your 
ST  has  the  TOS  operating  system  in 
Read  Only  Memory,  there  may  be 
enough  Random  Access  Memorj^  left 
to  run  Hickory,  Dickory,  Dock  with- 
out turning  off  buffered  graphics.) 

The  Amiga  version  includes 
speech  synthesis  and  uses  the 
mouse  pointer  instead  of  keyboard 
controls. 

In  the  Apple  and  IBM  PC/PCjr 
versions,  press  the  1  key  to  move 
the  minutes  hand,  press  2  to  move 
the  hours  hand,  and  press  ESC  to 
return  to  the  main  menu. 


Program  1:  Hickory, 
Dickory,  Dock  For 
Commodore  64 

For  instrucfions  on  entering  this  listing,  please 
refer  to  "COMPUTEI's  Guide  to  Typing  In 
Programs"  In  this  Issue  of  COMPUTE! 

AF  10  POKE53281 ,0:PO1;E53280,11 
CP  20  PRINT" ICLR) {WHT 118  DOWN] 

"TAB{8) "HICKORY,  DICKORY 

,  DOCKl 
QR  30  PRINT"110  DOWN  I "TAB (14)" 

PLEASE  WAIT 
XC  40  P0KE56,4S:CLR 
DC  50  POKE650,128:X=RHD(-TI) 
GJ  60  DIM  N(12),LO(12,6),CH(12 

,6),NUU0,15),T1(12),T2( 

12) 
MB  70  S=54272:FORI=0TO24:POKES 

+I,0:HEXT:POKES+24,15 
MM  80  FORI=1TO30:READA5,A,B,C: 

NEXT 
DB  90  V=5324a:POKE2040,13 
RM  100  FORI=0TO63:READA:POKE83 

2+1 ,A:NEXT 
FQ  110  P0KEV+39,2:P0KEV+3  7,1 :P 

0KEV+3S,6 
SF  120  POKEV, 150;POKEV+1,150 
XM  130  POKEV+23,1 :POKEV+29,l 
MD  140  POKEV+28,1  :P0KEV+21,1 


PF  150 


cs 

160 

JJ 

170 

CB 

180 

JR 

190 

QS 

290 

SM 

210 

KH 

220 

ES 

230 

RJ 

2  40 

DA 

250 

DR 

260 

AX 

270 

SO 

280 

AK 

290 

BR 

300 

JJ 

310 

JK 

320 

KA 

330 

JE 

340 

HX 

350 

5D 

360 

CD 

370 

PJ 

380 

XM 

390 

HF 

430 

HR 

410 

HS 

420 

CP 

430 

DD 

440 

DP 

450 

BB 

460 

OX 

470 

GP 

480 

JS 

490 

BH 

500 

GE 

510 

XB 

520 

EM 

530 

FQ 

540 

KD 

550 

RP 

560 

JF 

570 

DR 

580 

KG 

590 

KB 

600 

JE 

610 

MR 

620 

FORI=49152T049152+81 :RE 
ADAiPOKEI,A:NEXT 
SYS49152 

FORI =0TO143 : READA : POKEl 
2288+101*8+1, AsNEXT 
F0RI=1T012:READ  N(I):NE 
XT 

F0RI=1T012 :F0RJ=1T0N(I) 
:READL0(I,J) :NEXT:NEXT 
F0RI=1T012:F0RJ=1T0N(I) 
:READCH(I,J) :NEXT:NEXT 
FORI =0TO9 : F0RJ=1T01 5 : RE 
ADAS:IFA?="+"THENNU{I,J 
)=i60 

IFA5="-"THENNU(I,J)=32 
NEXTtNEXT 

F0RI=1T012:READT1(I) ,T2 
( I ) : NEXT 

RESTORE  i POKEV+21 , 0 
PRINT"iCLR) i3  DOWNj 
iWHTjCHOOSE  ONE  OF  THE 
I  SPACE) FOLLOWING: 
PRINTTAB(5)" {2  DOWN  J 1 . 
{ SPACE iTEST  -  HOURS 
PRINTTAB(5)" {DQHN}2.  TE 
ST  -  HOURS  AND  HALF  HOU 
RS 

PRINTTAB(5)" IDOWNJS.  TE 
ST  -  5  MIN.  INTERVALS 
PRINTTAB{5) "ID0WNJ4.  PR 
ACTICE 

PRINTTAB{5)" lDOWN)5.    EN 
D    PROGRAM" 

GETKKS:IFKK$=""THEN320 
KK=VAL(KK5) :IFKK<10RKK> 
5THEN320 

IFKK  =  5  THENSYS2048 : END 
POKE53272, (PEEK(53272)A 
ND240)+12 
RA=0:WA=0 

PRINT"{CLR) {3  DOWN  J" 
PRINTTAB(19)"12" 
PRINTTAB(14)"11 
19  SPACES)!" 
PRINT :PRINTTAB( 11 ) "10 
115  SPACES) 2" 
PRINT : PRINT : PRINTTAfl (11 
)"9{8  SPACES )Q 

18  SPACES) 3" 
PRINT:PRINT:PRINTTAB(12 
)"aU5    SPACES)  4" 
PRINT :PRINTTAB( 15 ) " 7 

19  SPACES) 5" 
PRINTTAB(20)"6" 
PRINT" (3    DOWN) lYEL)F5=^ 
*** 

PRTNT  "  I  GRN  )  F7  =  -t***** 

PRINT " ( WHT 1 RETURN=ANS . 

PRINT "M=MENU 

H=2 :M=12  JGOSUB950 :GOSUB 

1060 

P0KE1844 , 160 : POKEia44+S 

,2 

POKE1924, 160:POKE1924+S 

,2 

IFKK=4THEN2470 

C=H:D=M: PRINT" [WHT] 

1  HOME  3  SET  THE  HANDS  ON 

[SPACE)THE  CLOCK:" 

GOSUB15  90:Hi=A:M=B:GOSUB 

1230:GOSUB14  50:H=C:M=D 

PQKE198,0 

K$=" " :GETK5 :IFK5=" "THEN 

5  70 

IPK5  =  "  (P5  j  "THENGOSUBIU 

0 

IFK?=" [F7) "THENG0SUBI16 

0 

IFKS=CHR5 ( 13 ) THEN640 

IFK?="H"THEN260 

GOTO5  70 


SJ    6  30    J 

RK    640    IFHOAORMOBTHEN770 

HP    650    PRINT"! HOME) [2    DOWN ) "TA 

B(17)" [RVSjg7iRIGHTl" 
KQ    660    GOSUB2310 
DH    670    FORI=1TO10 

FD    680    PRINT"liroME){2    DO*ra)"TA 
B( 17)" (RVS) RIGHT  1 " 
FORT=lTO50iNEXT 
PRINT"  (home  j  {2    DOWNT'TA 
B(17) " RIGHT  1 " 
FORT=1TO50:NEXT 
NEXT 

PRINT" (HOME) {2    DOWNj"TA 
B(17)" t6    SPACES)" 
WA=0:RA=RA+1 :IFRA=5THEN 
RA=0: GOTO  1700 
GOT053a 


QX  690 
.MH  700 

DS  710 
CS  720 
DB  730 

CK  740 

MC  750 
GB  760 
HJ  770 

FF  780 

SF  790 
CR  800 

GO  810 
KE  820 


HE  830 
GK  840 

XK  850 
HK  860 


PRINT" iHOMEj 12  D0WN)"TA 
B(17)"[PUR)WRONGl" 
G0SUB2  390 :WA=UA+1 

FORT=1TO1000:NEXT 
PRINT "(HOME) {2  DOWN j "TA 
B{17)" t6  SPACES)" 
IFWA<3THEN570 
WA=0:PRINT"(HOME] [WHTJT 
HE  CORRECT  TIME  IS: 
17  SPACES)" 
GOSUB910:GOSUB1020 
H=A:M=B:GOSUB950:GOSUB1 
060 

FORT=1TO2000:NEXT 
PRINT" (HOME) (20  SPACES) 


HM  870  GOTO530 

FK  880  : 

FD  890  iCHANGE  MINUTE  HAND 

AK  900  : 

DQ  910  FORI=lTON(M) 

CH  920  POKELO(H,I) ,32 

PA  9  30  NEXT: RETURN 

AQ  940  : 

AD  950  F0RI=1T0N(M) 

ME  960  POKELO(M,I) ,CH(M,I) 

SX  970  P0KEL0(M,I)+S,  5 

JJ  980  NEXT:GOSUB2250:RETURN 

HA  990  : 

BB  1000  : CHANGE  HOUR  HAND 

SX  1010  : 

BH  1020  F0RI=1T0N(H)-1 

PK  1030  POKELO(H,I) ,32 

MJ  1040  NEXT: RETURN 

PC  1050  : 

RP  1060  F0RI-1T0N(H)-1 

KS  1070  P0KEL0(H,I),CH(H,I} 

PK  1080  P0KEL0(H,I)+S,7 

GP  1090  NEXT:GOSUB2250 :RETURN 

GF  1100  : 

KK  1110  GOSUB910:GOSUB1020 

FA  1120  H=H+1 :IFH=13THENH=1 

MB  1130  GOSUB1060:GOSUB950 

KG  1140  RETURN 

FK  1150  : 

PF  1160  GOSUB910:GOSUB1020 

KD  1170  M=M+1 !IFH=13THENM=1 

KR  1180  GOSUB1060:GOSUB950 

MM  1190  RETURN 

AP  1200  ! 

QR  1210  :  CHANGE  HOUR  NUMBER 

GR  1220  : 

CP  1230  IFH<10THEK1300 

EX  1240  K=0 

AB  1250    FORI=1796TO1956STEP40 

SP  1260    FORJ=0TO2 :K=K+1 

XH  1270    P0KEI+J,NU(1,K) :POKEI+ 

J+S,2 

FJ  1280    NEXT:NEXT 

FX  1290    TP=H-10:GOTO1310 

EG  1300    TP=H 

GD  1310    K=0 
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240K  Apple  Compatible 
#  Computer  System  # 


APIus  3000  computer  system  includes  192K  RAM,  48K  ROM 
(32K  Microsoft  Bask  plus  16K  ROM  Emulator),  160K  Loser 
V/a"  Disk  Drive  (Runs  Apple  II  Software),  Magic  Window 
Wordprocessor,  MaglCalc  spreadsheet.  Magic  Memory 
Database.  All  for  only  $399.00 


$ 


Complet&  SymtGm 


•  15  Day  Free  Trial. 


399 


00 


JM^(^icmemory  rj 


a 


Aplus  3000" 
System 


>»s^ 


•XP/M  CAHTHIDGE 
PORT 


DISK  DRIVE 
CONTnOLLER  INTERFACE 


•  occcT  'POWER 
SOUNO  \  \  •  RGB  •  «tSET  ^^„q^^ 
VOLUME  \       \OUTPLrT 

COMPOSITE  VIDeO 

CASSETTE 
INTERFACE 


Double  Immediate  Replacement  Warranty 

If  any  of  the  Aplus  3000  computer  system 
equipment  fails  due  to  faulty  workmonship  or 
materioi  within  180  days  of  purchase  we  will 
REPLACE  it  immediately  with  no  service  charge! ! 


*  Over  10,000  existing  Appl#  programs  *  Centronics  printer  Interface  Included 

240K  (192K  RAM,  48K  ROM)    •  ArtScl's  Magic  Window  II,  Magic  Memory,  and  MaglCalc  included 
•  160K  Laser  5% "  Disk  Drive  (Runs  Apple  II  software)  •  RGB  (80  columns  In  color)  and  composite  Included 

SPECIFICATIONS 


A  plui  3000  Is  a  complete,  self-conJoined  computer  based  on 
the  popylar  6502A  microprocessor  and  ccn  tap  into  the 
tremendous  software  library  of  Apple  tl.  Features  include 
192K  Bytes  RAM,  32KB  Enhanced  Microsoft  BASIC,  80  column 
text.  560H  X  )92V  color  graphic  display,  81  key  sculptured 
keyboard  and  high  efficiency  switching  power  supply.  Also 
included  as  standord  ore  Centronics  bus  printer  interface. 
Cassette  interface,  4  channel  sound  generator,  and  5Vi" 
Apple  Compatible  Disk  Drive. 

•  TeXT 

—  40  columns  X  24  rows  or  60  columns  X  24  rows  softwore 
selectable. 

—  5X7  choracters  in  7  X  8  matrix. 

—  Upper  and  lower  case  characters. 

—  One  of  Eight  colors  for  choracters/grophics  ond  background. 
Red,  Green,  Blue,  Cyon,  Magenta,  Yellow,  Black  and  White. 

—  Character  set  with  normol,  inverse  ond  flashing  capabilities. 

•  GRAPHICS 

—  2eOH  X  192V  6  colors  —  Black.  White,  Violet.  Green,  Blue.  Orange. 

—  280H  X  192V  8  colors  bit  imoge  —  Black,  While,  Red,  Green,  Blue,  Cyan, 
Magenta,  Yellow. 

—  560H  X  1 92V  6  colors  —  Black.  White,  Violet,  Green,  Blue,  Oronge.  (High 
resolution  color  monitor  required)     


More  Features  than  Apple^  for  less  than  Commodore^ 


Features  Aplut  3000  Apple  lie 

RAM  192K  64K 

Runs  Apple  II  Softwore  r*t  Yes 

Function  Keys  24  None 

4  Voice,  6  Octave  Sound  Y«*  No 

Composile  Video  Ye»  Yes 

Disk  Drive  Included  Extra  Cost 

Numeric  Keypod  Included  Extra  Cost 

Video  Cable  Included  Extra  Cost 

RGB  Color  Cord  Included  Extra  Cost 

80  Column  Cord  Included  Extra  Cost 

Centronics  Printer  Interface  Included  Extro  Cost 

Drive  Controller  Included  Extra  Cost 

$150  Wordprocessor  (Magic  Window)          Included  Extra  Cost 

$150  Spreadsheet  (MagiColc)  Included  Extra  Cost 

$60  Database  prg.  (Magic  Memory)  Included  Extra  Cost 

Your  Cost  $399.00  $1745.00 


Commodore 

C-128 

128K 

No 

16 

Yes 

Yes 

Extra  Cost 

Included 

Extra  Cost 

Included 

Included 

Extra  Cost 

Included 

Extro  Cost 

Extra  Cost 

Extro  Cost 

$1117,90 


Super  Apple  Compatible  Disk  Drive  Sale  $149.95. 

Quieter,  Cooler,  Better  Disk  Drives  for  your  Apple  II  plus,  He,  lie 
(specify  when  ordering).  List  $299.95.  SaIe$X49.9S. 


IS  Day  Free  Trial  —  If  It  doecn't  meet  your  expectations 

within  15  day*  of  receipt,  |u>t  send  It  back  to  us  UPS 

prepaid  and  we  will  refund  your  purchase  prlcell 


ACCESSORIES 

LIST 

SALE 

2nd  Disk  Drive 

$299.95 

$149.95 

2  professional  onalog  joysticks 

S   39.95 

$   24.95 

Z-80  cart,  ollows  CP/M  use 

$   99.95 

$  59.95 

RS232  adopter 

$   99.95 

$   59.95 

R/F  Modulotor  (TV  hookup) 

S   29.95 

S    19,95 

RGB  coble  (RGB  Monitor  hookup) 

S   24.95 

$    19.95 

Centronics  cable  (for  Centronics  printer) 

$   34.95 

$   24.95 

Technical  reference  manual 

S   29.95 

$    19.95 

80  columns  htl-Res  Green  Monitor 

$199.00 

$   79.95 

80  column  Hi-Res  RGB  Monitor 

$399.00 

$259.00 

Add  $2S.0O  for  shipping  and  handlingll 

Enclose  Cashiers  Check.  Money  Order  or  Personol  Check,  Allow  14 
days  lor  delivery.  2  lo  7  days  tor  phone  orders.  I  doy  express  moil ! 
We  accept  Visa  ond  MasterCard.  We  ship  C.O.D.  to  continental 
U.S.  addresses  only.  Add  $10  more  11  C.O.D, 


APPtE  and  C0MM0[X3RE  of  (•giil«r*d  Irodvmorhl  of  App1«  Ctrniputvr  Inc.  and  ComiTlodor*  Botlntit  Machin*».  Inc..  rnpMtlwIy 


COMPUTER  DIRECT 

We  Love  Our  Customers 
22292  N,  Pepper  Rd.,  Barrington,  III.  60010 

312/382-5050  to  order 


CALL   ATARI   CALL 

^119-389-5050    ^^^^        ^1^^^^^^     312-382-5050 

&  OIlJW3;rG      &  3^16       fT^  Totie    fCl  Cartridae.  (Dl  Disk. 


EI«ctronlc  Arts 

AOtatDR.  }i  LARRY  BIRDG01  ON  I  (D) $24,95 

AOtaS  MOVIE  MAKER  (0)  S23.95 

A06e«  SEVEN  CITIES  OF  GOID  (D| $23.95 

A0M7  PINBALl  CONSTRUCTION  SET  (D) $16.95 

A0688  MUSIC  CONSTRUCTION  SET  (D) $16.95 

A0689  FINANCIAL  COOKBOOK  (D| $27.95 

A0690  M.U.L.E.  (D) $16.95 

A069I  MURDER  ON  THE  ZINDERNUEF  (O) $16.95 

Atari 

A0S44  STAR  RAIDERS  (C) $1  4.95 

A0545  MISSILE  COMMAND  (C( $14.95 

A0546  GALAXIAN  (C) $1  4.95 

A0547  DEFENDER  (C) $14,95 

A054e  OIG  DUG  |C) $16.95 

A0549  DONKEY  KONG  (C) $16.95 

A0555  PENGO  (C) $16.95 

A0556  MILLIPEDE  (C) $16.95 

A0S57  JUNGLE  HUNT  (C) $16-95 

A0559  MOON  PATROL  (C) $16.95 

A0560  FINAL  LEGACY  iC)   $16,95 

A0561   FOOTBALL  (C) $14,95 

A0562  TENNIS  (C| $14,95 

A0563  TRACK  &  FIELD  (C)  $29.95 

A0564  EASTERN  FRONT  (C) $14.95 

A054*  ADVENTURE  WRITER  (0| $19.95 

A0567  STAR  VOYAGER  (O) $1  4.95 

A0568  SARGON  II  (0) $16.95 

A0569  MS  PACMAN  (C) $16.95 

A0570  DONKEY  KONG  JR  (C) $16.95 

A0571  POLE  POSITION  (D) $18.95 

Brodsrbund 

A05I  4  AWSK  Of  THE  SUN  (D) $24.95 

A051 5  OPERATION  WHIRIWIND  (D) $24.95 

A05I6  SPELUNKER   (D) $1B.95 

A0517  LODE  RUNNER  (0)   $20,95 

A051B  WHISTLERS  BROTHER  (D| $18,95 

A05O2  STEALTH  (D) $18.95 

A0670  CHAMPIONSHIP  LODE  RUNNER  (D) $26.95 

A0671   KARATEKA  (D) $23.95 

Actlvlslon 

A0597  PAST  FINDER  (D) $20.95 

A059B  SPACE  SHUTTLE  (D) $19.95 

A0S99  GHOSTBUSTER5  (D) $18.95 

A0665  HACKER  (Dl $19.95 

A0664  MIND  SHADOW  {D) $18.95 

A0667  MASTER  OF  THE  LAMPS  (D) $19.95 

A066a  GR  AMER  CROSS  CNTRY  RD  RACE  (0) $1 8.9S 

Suncom 

A0190  PARTY  QUIZ  (D> $14.95 

A0193  GENL  EDITION  2  (0)   $14.95 

A019i  GENL  EDITION  3  (D)   $14.95 

AD195  SPORTS  EDITION  (D)  $14.95 

A0196  EDUCATION  EDITION  (0) $14.95 

A0197  BIBLE  EDITION  ID) $14.95 

A0198  ENTERTAINMENT  EDITION  (D| $14.95 

Avolon  Hill 

A0573  TGIF  (D) $16.95 

A0574  FLYING  ACE  (D| $22.95 

A0575  MIDWAY  CAMPAIGN  (T) $12.95 

A0576  B-1  NUCLEAR  BOMBER  (Tl $18.95 

A0577  LEGIONNAIRE  (D) $20.95 

A0S78  TAC  (Dl $26.95 

A0579  MARKET  FORCES  (0) $1 4.95 

A0580  PANZER  JAGD  (0) $20.95 

A06O4  FREE  TRADER  (D| $19.95 

A06O5  EMPIRE  OF  THE  OVERMIND  (D) $26.95 

A0606  QUEST  OF  THE  SPACE  BEAGLE  ID) $22.95 

A0607  CLEAR  FOR  ACTION  (D) $26.95 

A0608  PARIS  IN  DANGER  (D) $26.95 

A06O9  GULF  STRIKE  (D) $22.95 

A0504  GALAXY  (Dl $16.95 

A0SO5  ANDROMEDA  CONQUEST  (D) .  $16.95 

A05O6  COMPUTER  STOCKS  &  BONDS  (0) $18.95 


Xmrox 

A0412STICKYBEAR  BOP  (D) $19.95 

A0413  STICKYBEAR  NUMBERS  (D)  .; $19.95 

A0414  STICKYBEAR  BKST  BOUNCE  (D> $19.95 

A0415  STICKYBEAR  0PPO5ITES  (D) $19.95 

A0416  STICKYBEAR  ABC  (D) $19.95 

A0417  STICKYBEAR  SHAPES  (D) $19.95 


BUSINESS 

A0201  ATARI  WRITER  (C) $39,95 

A02O3  VISICALC  (D) $29.95 

A0204  HOME  FILING  MANAGER  (D) $19.95 

A0206  FILEWRITER  (D) $20.95 

A0207  REPORT  WRITER  (D) $20.95 

A020e  MENU  WRITER  ID) $19.95 

A0209  FAMILY  FINANCE  (D) $19.95 

A02I0  HOME  INTEGRATOR  (D) $19.95 

A02I1  SMALL  BUS  INVENTORY  (D) $11.95 

A0212  SALESMAN'S  EXPENSES  (D)  $11.95 

A0214  RETAIL  INVOICE  (D)  $11.95 

A0215TIMEWISE  (D) $14,95 

A0216  PEACHTREE  G/1  (D)  $49,00 

A021 7  PEACHTREE  A/R  (D) $49.00 

AD218  PEACHTREE  A/P  (0) $49.00 

A0717  SYN  CALC  [D) $32.95 

A07I8  SYN  CALC  TEMPLATES  (D) $14.95 

A0672  APPT  PLNR/WKLY  SCHEDULE  (DJ $12,95 

A0673  ACCOUNTS  RECEIVABLE  (O) $11,95 

A0674  ACCOUNTS  PAYABLE  (D) $11,95 

Synops* 

A0534  ENCOUNTER  (D) $14,95 

A0535  BLUE  MAX  2001  (D) $18,95 

A0534  QUASIMODO/AIR  SUPPORT  (D) $15,95 

AD537  NEW  YORK  CITY/EIECTRICIAN  (D) $16,95 

AD538  RAINBOW  WAIKER/COUNTDOWN  (D|  .  .  $16.95 

A0539  FORT  APOCALYPSE  (D) $20.95 

A0540  BLUE  MAX  (D) $20.95 

A071  5  MIND  WHEEL  (D) $25.95 

A0716  ESSEX  ID) $25.95 

Epyx 

A052O  JUMPMAN  (D) $15,95 

A0521  DRAGON  RIDERS  OF  PERN  (D)   $18,95 

A0522  SUMMER  OLY  GAMES  (D) $24.95 

A0523  PIT5TOP  II  (D) $24.95 

A0524  BALI  BLAZER  (D) $24.95 

AQ525  RESCUE  ON  FRACTUIUS  (D) $24.95 

A0693  KORONIS  RIFT  (D) $24.95 

A0692  THE  EIDOLON  (D) $24.95 

Strategic  Simulations,  inc. 

A060I  SHOOTOUT  AT  OK  GALAXY  (D) $17,95 

A0602  DNIEPER  RIVER  LINE  (D) $24,95 

A0603  SPACE  COWBOY  (D) $18.95 

A0526  KNIGHTS  OF  THE  DESERT  (D) $24.95 

A0527  FIELD  OF  FIRE  (D) $24.95 

A0528  FORTRESS  (D)  $22,95 

A0529  COSMIC  BALANCE  (Dl $24,95 

A0530  IMPERIUM  GALATUM  (D) $24,95 

A0531  RAILS  WEST  (0) $24,95 

A0532  TIGERS  IN  THE  SNOW  (0) $24.95 

A0S33  50  MISSION  CRUSH  (O) $24.95 

A0590  BROADSIDES  (D) $24.95 

A0591  COMPUTER  QUARTERBACK  (0) $24.95 

A0592  COMPUTER  AMBUSH  (D) $34.95 

A0593  COMPUTER  BASEBALL  (D| $24.95 

A0712  COLONIAL  CONQUEST  (D) $24,95 

A0713  COMBAT  LEADER  (D| $23,95 

A0714  KAMPFGRUPPE  (0) $34,95 


Atari 

A0420  ATARI  MUSIC  I  (D)  $19,95 

A0421  ATARI  MUSIC  II  (O) $19,95 

A0422  INTRO  PROG  1  (T) $14,95 

A0423  INTRO  PROG  II  (T) $14.95 

A0424  INTRO  PROG  lll(T)   $14,95 

A0425  ATARI  LAB  STARTER  (C) $44,95 

A0426  ATARI  LAB  LIGHT  MOD  (C)   $33,95 

A042B  SKYWRITER  (C) $16,95 

A0429  CONVERSATIONAL  FRENCH  (T) $16,95 

A0430  CONVERSATIONAL  SPANISH  (T)   $16,95 

A0431  MY  FIRST  ALPHABET  (D) .$16,95 

A0432  SPEED  READING  (T) $19,95 

A0433  TYPO  ATTACK  (C) $16,95 

A0435  VERBAL  MODULE  SAT  (D) $29.95 

A0436  SAT  SAMPLE  PRETEST  (D) $17,95 

A0437  MATH  MODULE  SAT  (D) $29,95 

A0438  TOUCH  TYPING  (T) $14.95 

A0439  JUGGLES  RAINBOW  (D) $16.95 

A0440  JUGGLES  HOUSE  (D).,.,- $16,95 

A0442  TOUCH  TABLET/ SOFTWARE $49.00 

A0443  PAINT  (D) $19.95 

A0315  PILOT/TURTLE  GRAPHICS  (C) $29.95 

A0316  LOGO  (C) $39.95 

A031 B  ASSEMBLER/EDITOR  (C) $19.95 

A0319  MACRO  ASSEMBLER  (C) $19.95 

Spinnakar 

A0444  LINKING  LOGIC  (C) $16.95 

A0445  DANCE  FANTASY  (C) $16,95 

A0446  MEMORY  MANOR  (C) $16.95 

A0447  LOGIC  LEVELS  (C) $16,95 

A044e  KINDERCOMP  (D) $16,95 

A0449  PACEMAKER  (D) $16,95 

A0450  KIDS  ON  KEYS  (D) $16,95 

A045!  GRANDMAS  HOUSE  (D) $16,95 

A0452  KIDWRITER  (D) $16,95 

A0453  FRACTION  FEVER  (D) $18,95 

A0454  IN  SEARCH  AMAZ  THING  (D) $22,95 

A0455  TRAINS  (D) $18.95 

A0456  ALPHABET  ZOO  (D) $16,95 

A0457  AEROBICS  (D)  $22,95 

A07I0  DELTA  DRAWING  (C) $16.95 

A071 1  ADVENTURE  CREATOR  (C) $16.95 

Amarlcan  Educational  Computar 

A0459  VOCABULARY  WORD  BLDR  (Dl $16.95 

A0460  GRAMMAR  WRK  USE  SKILLS  (O) $16,95 

A046I  WORLD  GEOGRAPHY  FACTS  (D) $16,95 

A0462  SPANISH  VOCAB  SKILLS  (01 $16.95 

A0463  FRENCH  VOCAB  SKILLS  (D)  $16.95 

A0464  WORLD  HISTORY  FACTS  (0) $16.95 

A0465  US  HISTORY  FACTS  (D) $16.95 

A0466  US  GEOGRAPHY  FACTS  (D)  $16,95 

A0467  US  GOVERNMENT  FACTS  (D) $16,95 

A0468  A  PLUS  LEARN  TO  READ  (D) $24,95 

A0470  A  PLUS  READING  COMPREHENSION  (D)  .$24,95 

A047!  COMPUTER  LEARNING  PAD $37.95 

A0418  BIOLOGY  FACTS  (D) $16.95 

A0493  ELEM  SCIENCE  3  S  4(D)   $16.95 

A0494  ELEM  SCIENCE  5  S  6  (D)   $16.95 

A0495  ELEM  SCIENCE  7  £  8  (Dl    $16.95 

DLM 

A0680  SPELLING  WIZ  (D) $19,95 

A0681  ALIEN  ADDITION  |D)  $19,95 

A0682  METEOR  MULTIPLICATION  (D)  $19,95 

A06e3  ALLIGATOR  MIX  (D) $19.95 

Artwrorx 

A073a  LINKWORD  LANGUAGE-SPANISH  (D)  ,.  ,$17.95 

A0739  LINKWORD  LANG-FRENCH  (D) $17.95 

A0740  LINKWORD  LANG-GEHMAN  (D) $17.95 

A0741  LINKWORD  LANG-ITALIAN  (D) $17,95 

A0663  MONKEYMATH  (0) $15.95 

A0664  MONKEY  NEWS  (D) $15.95 


A4d  1)  DO  tgi  ih.pping  handling  and  tr-^itiO<^i*  lll-nox  ifthdtnti 
pi«ot*  add  6*.  ia>  Ad^J  i6  00  lor  CANADA  PUCR10  BICO  HAWAII 
AlASK*  APOfP0o'd#**  Conodidn  o^d#ri  <tii.tl  b«  .n  U  S  dollOU 
rtt  DO  NOI  l»POI»I  lO  OlHlR  COLINTHtS  EnCtPt  CANADA 
fntlo»»  Cflihi»i»  Cnett  Mont,  Qidt'  C  Peiiongl  Ch»(k  Allow  1* 
dOfS  lap  dcl)i«Pv  ?  10  7  day»  I91  pnon*  Qi4«ft  I  dor  vipi ttt  moil 
VISA       MASTERCARD       COD 

NoCOD   loConodo   APO  FPO 


ORDER    COMPUTER  DIRECT 

^P^^%  ^%  Jfk  ^Z'        W^'e  Love  Our  Customers 
I  V^l^#%    ■  22292  N.  Pepper  Rd.,  Barrington,  111.60010 

312/382-5050  to  order 


■I    152K  Lowest  Price  In  The  USA!  i52k 

atarI^  Computer  System  Sale 

*  students  *   Word  Processing   •   Home  *   Business 


$379 


©Atari 
®Atari 
®Atar 
Atari 


SYSTEM   PRICE 


LOOK  AT  ALL  YOU  GET  FOR  ONLY 

LIMITED  OUANTITICS 

ri  130XE  152K  Computer 
'\  1050  127KDisk  Drive 
n  1027  Letter  Quality  20  CPS  Printer 
"i  Writer  Plus  Word  Processer  with  Spell  Checker 
Atari  BASIC  Tutorial  Manual 

All  connecting  cobles  S  T.V.  interfoce  included.       — ^^_  m, 

'..'  Uonilors  sold  separelly,  T^^TALS 


LIST  PRICE 

S249.00 

299,00 

299.00 

59.95 

16.95 


INDIVIDUAL 
SALE  PRICE 
$134« 
159" 

12'* 


$923.90      $517.75 

CALL  FOR  1027  PRINTER  REPLACEISAENT  OPTIONS 


SAVE 

OVER  $100 

All  5  ONLY 

$3^900 

SYSTEM 
SALE  PRICE 


Other  Accessories  List  Sale 

A     12"  Hi  Resolution  Green  Screen  Monitor         $199.00  $79.95 

■C^     13"  Hi  Resolution  Color  Monitor  $399.00        $159.95 


AdcJ  S9.95  for 
Connection  Cables 

Add  $10  for  UPS 


15  DAY  FREE  TRIAL.  We  give  you  IS  doys  to  try  out  this  ATARI  COMPUTER  SYSTEM!  !  If  it  doesn'l  meet  your  expectations,  jusi  send  it  bock  to  us  prepaid 
ond  we  will  refund  your  purchase  price! !  90  DAY  IMMEDIATE  REPLACEMENT  WARRANTY.  If  ony  o(  the  ATARI  COMPUTER  SYSTEM  equipment  of 
programs  foil  due  to  fouhy.workmonship  or  moteriol  within  90  days  of  purchase  we  will  replace  it  IMMEDIATELY  with  no  service  chorge!  ! 


Best  Prices  *  Over  1000  Programs  and  500  Accessories  Avoilable  *  Best  Service 
*  One  Day  Express  Mail  *  Progromming  Knowledge  *  Technical  Support 


Add  $35.00  for  shipping  and  handling!! 

Enclose  Coshiers  Check,  Money  Order  or  Personal  Check,  Allow  1 4 
doys  for  delivery,  2  lo  7  doys  for  phone  orders,  1  doy  express  moil ' 
We  accept  Viso  and  MasterCord,  We  ship  CO.D.  to  conlinenlol 
U.S.  oddresses  only- Add  SIO  more  if  CO.D.,  odd  S25  if  Air  Moil- 


COMPUTER  DIRECT 

Wc  Love  Our  Customers 
22292  N,  Pepper  Rd.,  Barringlon,  III.  60010 

312/382-5050  to  order 


DC  1320 

XX  1330 

OS  1340 

GO  1350 

DX  1360 

AK  1 J7J 

KD  1380 

XR  1390 

as  1400 

RK  1410 

FK  1420 

EX  1430 

XP  1440 

SO  1450 

XS  1460 

PJ  1470 

HE  1480 

MH  1490 

EE  1500 

FA  1510 

GD  1520 

QM  1530 

FP  1540 

FJ  15  50 

KD  1560 

RE  1570 

liB  1580 

ilF  1590 

HD  1600 


CR  1613 

FA  1620 

MQ  1630 

JA  1640 

MC  16  50 

HJ  1660 

DM  1670 

FX  1680 

RQ  1690 

DC  1700 

JJ  1710 

FX  17  20 

DE  1730 

JG  1740 

SX  1750 

PC  1760 


XM  1770 

KC  1780 

RP  17  90 

RQ  1800 

HB  1810 

XX  1820 


RF  1830 
AM  1840 


GC  1850 

DC  I860 

RF  1870 

Rx  inao 

BK  1890 

KS  1900 


FORr=ia00TO1960STEP40 

FORJ=0TO2:K=K-*-l 

POKEI+J,NU(TP,K) :POKEI 

+J+S,2 

NEXT: NEXT 

IFH>9THENRETURN 

FOKI  =  1796TOl'J36SrEP40 

FORJ=0TO2:K=K+1 

P0KE1+J,32 :POKEI+J+S, 2 

NEXT: NEXT 

RETURN 

CHANGE    MINUTE    NUMBER 

Tl-TL (M) :T2=T2(M) 

K=0 

FORI =1806TO1 966 STEP40 

FORJ=0TO2:K=K+1 

POKEI+J,NU(Tl ,K) :POKEI 

+J+S,2 

NEXT: NEXT 

K=0 

FORI=iei0TOi970STEP4O 

FORJ=0TO2 :K=K+1 

P0KEI+J,NU(T2,K) :POKEI 

+J+S,2 

NEXTiHEXT 

RETURN 

GET    RANDOM    TIME 

G=INT(RND(1)*12)+1 :IFG 

=ATHEN1600 

A=G 

J=INT(RND( 1 )*12)+1 

IFKK=1THENB=12 :RETURN 

IFKK=2ANDJ<6THENB=12:R 

ETURN 

IFKK=2THENB=6 :RETURN 

B=J; RETURN 

: HICKORY 

POKH53  2ai,0:POKE53  280, 

11 :PRINT"(CLRj" 

FORI=0TO24;POKEI+S,0;N 

EXT 

POKES+24,  15  ;  POKES  1-6,  2  4 

0 

POKEV,  2  50  :POKEV-l-l  ,  184 

POKEV+21 , 1 

PRINT"  I  3    DOWN  J '■TAH(30) 

"lRVS)i23l7    SPACES)" 

PRINTTABOa)"  IRVS}     iB^ 

12    SPACES  is U    SPACES) 

i2}  ■• 

PRINTTAB(30)" IRVSJ     iSl 
12    SPACES )-i 2    SPACES] 
823    •■ 

PRINTTAB(30)" (RVS)     |8i 
12    SPACES 1q*CB 2 j     " 
PRINTTAB(  30)"'SRVS)     iBi 
15    SPACES) E 21     " 
PRINTTAB(30)'"  iRVS)B2i 
17    SPACES!" 
F0RI=1T09 

PRINTTAB(30)" iRVS) 
12    RIGHT) 1  OFF)  (YEL) - 
12    SPACES)  lRVS)i2^    ■^ 
NEXT 

PRINTTAB(30)" iRVS j 
{2    RIGHT) lOFF) 1YEL)Q 
12    RIGH7)lWS!^2§    " 
PRINTTAB(30)"lRVS) 
{S    RIGHT)     " 
PRINTTAB(30)"lRVS) 
[7    SPACES] tWHT)" 
PRINT" iHOHEj 15    DOWN!" 
Z  =  7:GOSUB1970:PR1['JT 
Z=8:GOSUBl 970: PRINT 
FORI=186TO50STEP-2 :POK 
EV+1 , I :NEXT 


"Hickory,  Dickory,  Dock"  for  the 
Commodore  64  and  128,  an  amusing 
educational  program  for  children. 


DX    1910    Z=4:GOSUB1970:PRINT 
KM    1920    POKE133P, 160 :POKE1257, 

194 : POKEl 298 , 206 : POKEl 

3  38+S, 15 :P0KE1 298+5, 15 
FS    1930    POKE1339,160:Z=4:GOSUB 

1970:PRINT 
KS    1940    FORI=50TOia6STEP2 SPOKE 

V+1 , I :NEXT 

Z=7  JGOSUB1970 :GOTO250 


DO  1950 

FO  1960 

JE  1970 

SM  1980 


F0RI=1T0Z 

READA$ , A, a , C : POKES+4 , 1 

7 
XJ     1990    PRINTA? ; :P0KES+1,A:P0K 

ES.B 
QB    2000    F0RT-lT0C:NEXT:P0KES+4 

,16 

NEXT: RETURN 


EE  2010 
ES  2020 
HX  2030 
AS  2040 


HX  2050 
JS  2060 

KH  2070 

QP  2080 

SE  2090 

HG  2100 
PC  2110 

JS  2120 

MG  2130 
DH  2140 

AK  2150 

FJ  2160 

XX  2170 

SA  2180 


DATA  "HICK", 12,32,125, 

"0",12,216,125, "RY,  ", 

14,107,125, "DICK", 14,1 

07,125 

DATA  "0", 16, 47, 125, "RY 

,  ",18,42,12  5, "DOCKi ", 

19,63,1000 

DATA  "THE  ",12,32,125, 

"MOUSE", 12,32,125, "  ", 

12,216,125, "RAN  ",14,1 

07,125 

DATA  "UP  ",14,107,125, 

,  16,47,125, "THE  ",18,4 

2, 125,  "CLOCK. ",19,63,1 

000 

DATA  "THE  ",14,107,125 

, "CLOCK  ", 19,6  3,250, "S 

TRUCK  ",19,63,125 

DATA  "ONE,  ",18,42,250, 

"THE  ",18,42,125, "MOUS 

E  ",16,47,250 

DATA  "RAN  ",16,47,125, 

"DOWN. ", 14,107,1000 

DATA  "HICK", 14,107,125 

,  "OR",  16,47,124,  "Y,  ", 

14,107,125,  "DICK", 12, 2 

16,125 

DATA  "0", 12,32,125, "RY 

,  ", 10,205, 125, "DOCKt  " 

,9, 159, 1000 

DATA  5,64,84,5,64,84,5 

,85 

DATA  84,0,8  5,80,0,68,6 

4,0 

DATA  85,64,16,81,65,16 

DATA  16,4,1,31 ,255,253 

,15,255 

DATA  252,0,255,192,0,2 

55,192,0 


EM  2190  DATA  255,192,65,170,12 

8,68,162,128 
BD  2200  DATA  80,162,128,0,162, 

128,0,17 
GD  2210  DATA  0,0,17,0,1,81,80, 

255 
Ep  2220 
HA  2230 
XR  2240 
CR  2250 
DQ  2  260 
DC  2270 
DJ  2280 
SH  2290 
MA  2300 
SA  2310 
PB  2320 
XC  2330 
KF  2340 
XA  2350 
GA  2360 
DQ  2370 
CG  2380 
KX  2390 
QG  2400 
CR  2410 
BS  2420 
BQ  2430 
QH  2440 
JR  2450 
GP  2460 
XJ  2470 


QX  2480 
HP  2490 

DD  2500 

CA  2510 

DA  2520 
KE  2530 
PA  2540 
MG  2550 
RC  2560 
HK  2570 

RF  2580 

OJ  2  5  90 

KA  2600 

PA  2610 

SF  26  20 

HA  26  3  0 

HS  2640 

AG  2650 

CJ  2660 

XG  2670 

RM  2680 

AM  2690 

AS  2700 

GM  2710 

XE  2720 

XG  27  30 

JE  2740 

KF  2750 

FD  2760 

RQ  2770 


MUSIC  SUBS 

POKES+5,0:POKES+6,2 

POKES+4, 129 

POKES, 100 :P0KES+1, 100 

FORT=lTO10:NEXT 

POKES  +  4,  128:RETUR!v 

POKES+5,0 :P0KES+6, 240 

FORI=1TO10 

POKBS+4, 17 

POKES , 1 00 : POKES+ 1,20 

FORT=.1T050:NEXT 

POKES+4, 16 

NEXT: RETURN 

POKES+6, 2 40 i POKES+5,0 

POKES+4, 17 

POKES, 108:POKES+1 ,6 

FOHT=lTO300sNEXT 

POKES+4, 16 iRETURN 

LEARNING    MODULE 

PRINT"12    UPj 

Ul    SPACES)" 

GOSUB1230:GOSUB1450 

K5="" :GETK5 :IFK$=" "THE 

N2490 

IFKS=" lF5) "THENGOSUBll 

10:GOSUB1230 

IFK$=" [F7) "THENGOSUBll 

60:GOSUB1450 

IFKS=."H"THEN260 

GOTQ2490 

:ML    DATA 

DATA    17  3,14,220,41,2  54 
,141,14,220 

DATA    165,1,41,251,133, 

1,160,0 

DATA    185,0,208,153,0,4 

8,185,0 

DATA    209,153,0,49,185, 

0,210,153 

DATA    0,50,185,0,211,15 

3,0,51 

DATA    185,0,212,153,0,5 

2,185,0 

DATA    213,153,0,53,185, 

0,214,153 

DATA   0,54,185,0,215,15 

3,0,55 

DATA   260,208,2(55,1.65,1 

,9,4,133 

DATA    1,173,14,220,9,1, 

141,14 

DATA    220,96 


CHAR    DATA 

DATA    1,2,4,8,16,32,64, 

128 

DATA   128,64,32,16,8,4, 

2,1 

DATA    0,0,0,0,0,3,28,22 

4 

DATA    0,0,1 ,14,112,128, 

0,0 

DATA    7,56,192,0,0,0,0, 

0 

DATA    192,56,7,0,0,0,0, 

0 


42     COMPUTEI      Mav  1<?86 


FK    2780    DATA    0,0,128,112,14,1, 

0,0 
GH    2790    DATA    0,0,0,0,0,224,28, 

3 
GS    2800    DATA    8,12,14,255,255,1 

4,12,8 
FD    2810    DATA    24,24,24,24,24,12 

6,60,24 
JQ    2820    DATA    31,15,13,31,57,11 

2,224,192 
DH    2830    DATA    192,224,112,57,31 

,15,15,31 
SC    2840    DATA    3,7,14,156,248,24 

0,240,248 
BP    2850    DATA    248,240,240,248,1 

56,14,7,3 
QX    2860    DATA    0,0,254,62,126,13 

4,2,0 
RH    2870    DATA    0,0,127,124,126,9 

7,64,0 
FS    2880    DATA    0,0,0,2,134,126,6 

2,254 
FC    2890    DATA   0,0,0,64,97,126,1 

24,127 
EG    2900    : 

QK  2910  :HOUR  HAND  DATA 
HJ  2920  : 

CB  2930  DATA  3,5,6,5,3,4,3,5,6 
,5,3,4 

AG    2940    DATA    1405,1366,1327 
EJ    2950    DATA    1405,1406,1407,13 

68,1369 
KM    2960    DATA   1445,1446,1447,14 

48,1449,1450 
CG    2970    DATA    1485,1486,1487,15 

28,1529 
FA    2980    DATA    1485,1526,1567 
JE   2990    DATA   1484,1524,1564,16 

04 
XG    3000    DATA    1483,1522,1561 
GD    3010    DATA    1483,1482,1481,15 

20,1519 
SQ    3020    DATA    1443,1442,1441,14 

40,1439,1438 
HC   3030   DATA   1403,1402,1401,13 

60,1359 
QS    3040    DATA    1403,1362,1321 
SP    3050    DATA    1404,1364,1324,12 

84 
CD    3060    DATA    78,78,111 
RE    3070    DATA    103,104,105,103,1 

15 
CP    3080    DATA    67,67,67,67,67,10 

9 
AG    3090    DATA    106,107,108,106,1 

17 
OB    3100    DATA   77,77,112 
FC    3110    DATA   93,93,93,110 
SF    3120    DATA    78,78,113 
MS    3130    DATA    105,104,103,105,1 

18 
QR    3140    DATA    67,67,67,67,67,31 
PD    3150    DATA    108,107,106,108,1 

16 
QJ    3160    DATA    77,77,114 
CJ    3170    DATA   93,93,93,30 
EJ    3180    : 

JP    3190    : NUMBER    DATA 
GJ    3  200     : 
AX    3210    DATA   +,+,+,+,-,+,+,-,+ 

SE  3220  DATA   -,+,-,- 

JD  3230  DATA    +,+,+,- 

KG  3240  DATA    +,+,+,- 

KR  3250  DATA    +,-,+,+ 

EG  3260  DATA   +,+,+,+ 


+,-,-,+,- 
-,+,+,+,+ 
-,+,-,+,+ 
-,+,+,+,+ 
-,-,+,+,+ 


MD  3  270  DATA    +,+,+,+,-,-,+,+,+ 

AF  3230  DATA    +,+,+,-,-,+,-,-,+ 

GD  3290  DATA   +,+,+,+,-,+,+,+,+ 

JS  3300  DATA    +,+,+,+,-,+,+,+,+ 

DX    3310    ! 

J J    3320    :MORE    DATA 

GA    3330     : 

HJ    3340    DATA    0,5,1,0,1,5,2,0,2 

,5,3,0 
KQ    3  3  50    DATA    3,5,4,0,4,5,5,0,5 

,5,0,0 


Program  2:  Hickory, 
DIckory,  Dock  For  Atari 
400/800/XL/XE 

Version  by  Kevin  Mykytyn,  Editorial 

Programmer 

For  instructions  on  entering  ttiis  listing,  please 

refer  to  "COMPUTEI's  Guide  to  Typing  In 

Programs"  in  this  issue  of  cotviPUTEi. 

PK  10  GOTO  30 

16  20  X  =  INT  (XC-XR*COS  Cfl)  )  :Y  = 
INT ( YC-YRtSIN (All : RETU 
RN 

PC  30  DIM  ft»  (5)  ,K«  (1)  ,  TIME*( 
5» :OPEN  #1,4,8, "K: "!P0 
KE  82,0 

BN  40     GRAPHICS     18:PRINT     #6;" 
1-     D^lj    hours":PRINT     « 
6tPRINT     i6;"2.     ia^Dho 
urs     and{:6    SPACESJhalf 
hours" 

ftLSB    PRINT    #6: PRINT    «6;"3. 
■  ■**!   -five    minute 
{4    SPACES>intBrvals":P 
RINT     *6:PRINT    «6;"4.     E 

JB  60     PRINT     *6:PRINT     #6;  "5. 
QHQu" 

NL70  GET  *t  ,  Ks  K*  =  CHR*(t<)  :  IF 
K»<"1"  OR  K*>"5"  THEN 
70 

00  80     N  =  VAL{K*):IF    N  =  5    THEN 
GRAPHICS     0SEND 

HN  90     IF     N  =  4     THEN     250 

Kn  100  GDSUB  290 

LH110  HR=INT(RND  (1  )  «12) +1-H 
N=0:IF  N=2  THEN  «N=IN 
T (RND ( 1 )+0.5) t30: QDTO 
130 

HF120  IF  N  =  3  THEN  MN=INT(RN 
D<n  «12)  »5 

ES  130  SOSUB  480:flMN  =  MN:  AHR  = 
HRj  riN-0:HR=12 

JH  140  QOSUB  440:GOSUB  540:1 
F  K»="a"  THEN  40 

LP  150  IF  K*<>CHR»<155)  THEN 
140 

EF  160  POKE  656,0:PDKE  657, B 
:IF  AMNOMN  DR  AHR<  >H 
R  THEN  190 

BE  170  NR-NR  +  1  :NW  =  0:  PRINT  "R 
IBHT ! " ; :FOR  A=15  TO  0 
STEP  -1 

FE  180  SOUND  1,  121  ,  10,  AsSOUN 
D  2,81 , 10, A: FDR  T=l  T 
0  10:NEXT  TiNEXT  AiGQ 
3UB  230:QOTO  210 

OK  190  MN  =  AMN:  HR  =  AHR:  PRINT  " 
WRONG  !  '■;  :  FOR  A=10  TD 
1S0:SDUND  1 , A, 12, 15:N 
EXT  AiGDSUB  230:NW=NW 
+  1  :  IF  NW03  THEN  130 


This  version  of  "Hichory,  Dickory, 
Dock"  runs  on  all  Atari  400/800,  XL, 
and  XE  computers. 


PC  200  NW  =  0:SDSUB  440:  QOSUB 
4B0:FOR  TD-1  TO  1500: 
NEXT  TDiGOTO  110 

HI  210  IF  NR  =  S  THEN  NR  =  0:BQS 
UB  590 

FP220  GOTO  110 

PB  230  SOUND  2 ,  0,  0,  0:  SOUND  1 
,0,0,0:FDR  TD=1  TO  60 
0:NEXT  TD:PRINT  " 
{6  LEFTX7  SPACES}":: 


EN  240 


LC  250 
SH  260 


DB  270 
PJ  280 
LC  290 


OH  300 


HH  310 


DH320 


£1  330 

CL  340 

U   350 

BL  360 

fH  370 

ED  380 

m  390 

i;n  400 


LK  410 


An  420 


RETURN 

FDR  T=l  TO  1500:NEXT 
T:SOTO  40 
BOSUB  290 

GOSUB  440: GDSUB  480:G 
OSUB  540: IF  K«<>"Q"  T 
HEN  260 
GOTO  40 

REM  DRAW  THE  CLOCK 
GRAPHICS  6:SETC0LDR  2 
,0,0;GDSUB  410:CDLaR 
1:XC"B0: YC-3S: YR=2e:X 
R=YR«1 . 2: GOSUB  340:XR 
=XR+B: YR=YR+6: YC=YC-4 
NW=0: NR=0:PDKE  656,0: 
POKE  657, 25: PRINT  "(H 
)0URSt5  SPACES} (M) INU 
TESC5  SPACES} (G)UIT" 
FDR  Q=l  TD  12:A*=STR* 
(Q) : A=Q«30+90: GOSUB  2 
0: X'lNT (X/8) :QDSUB  38 
0:NEXT  Q: XR=XR-10: YR= 
YR-10: YC=YC+4 
HR=12:MN=0sOMX  =  XC:  DHX 
=XC:OMY=YC: OHY=YC:RET 
URN 

REM  CIRCLE  DRAWING  SU 
BROUTINE 

DEG  : FOR  A=0  TO  360  S 
TEP  1 0: eOSUB  20 
IF  A=0  THEN  PLOT  X,Y 
DRAWTO  X,Y:NEXT  A;RET 
URN 

REM  CHARACTER  PLOTTIN 
G  SUBROUTINE 
CHR0M=57344: SCREEN=PE 
EK(Be)+256«PEEK(B9)+X 
+  Yt20- (LEN  CA«)=2) 
FOR  A=l  TO  LEN(AS):CS 
=CHROM+ASC(A*(A,A>)«B 
-256 

FOR  B=0  TO  7: POKE  SCR 
EEN+B«20, PEEK(CS+B) :N 
EXT  B: SCREEN=SCREEN+1 
:NEXT  AsRETURN 
DL=PEEK(560) +256* PEEK 
(561J:PDKE  DL+85,71:P 
OKE  DL+88,2:P0KE  DL+B 
9,  65 

POKE  DL  +  90, PEEK(560)  : 
POKE  DL+91 , PEEKC561 ) : 
RETURN 
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BH  430 
DF  440 


FC  450 

K  AhZ 

EJ  470 
M   480 


REM  OUTPUT 
COLOR  BiPL 
fiWTO  OMX.Q 
YC: DRAWTD 

COLOR  1:A 
UB  20:PLDT 
TO  X, Y: XR= 
2:0MX  =  X:  0(1 
A=HR»30+90 
20: PLOT  X 
X, Y: XR=XR 
OHX=X: QHY 

RE 

E 
P 


CLO 
OT  X 
MY:  P 

OHX, 

MN«6 
XC, 
XR/2 
Y  =  Y 
+  MN/ 
C,  YC 
«2!  V 
V:  RE 


CK  TIME 
C, YC: DR 
LOT  XC, 

DHY 

+90: QOS 
YC:DRAW 
:  YFi  =  YR/ 

2:6QSUB 

DRAWTO 
R=YR*2: 
TURN 


X=X: QHV=Y: RETURN 

M  OUPUT  DISITAL  TIM 

OKE  656,0:PDKE  657, B 
POKE  i5B, 0: IF  HR<10 

■UChI        DDTWr         I"         •<- 


CP  510 
IP  520 


TURN 

REM  CHANGE  TIME  ROUTI 

NE 

SET  #1  ,K:K»  =  CHR* (K)  : I 

F     K*="M"     THEN     MN=MN+5 
:1F     MN  =  fi0     THEN     MN  =  0 

FN  550     IF     t<»="H"     THEN     HR  =  HR  + 
1 


HH  530 

m  540 


IE  620 


KK  630 


Program  3:  Hickory, 
Dlckory,  Dock  For  Apple 

Version  by  Tim  Victor,  Editorial 

Programmer 

For  [nsttucfions  on  entering  this  listing,  please 

refer  to  "COMPUTErs  Guide  to  Typing  In 

Programs"  in  this  issue  of  COMPUTEl. 


6F    100 

ED    110 
n    120 


25    130 


BA    140 

32  150 
39  160 
IE    170 

IC  180 


PI  =  4  «  ATN  (1) 
DIM  DP(4,7) ,CX(12) ,CY(12) 
6QSUB  840:  GOSUB  960:  GOB 
UB  1120:  GOSUB  1160:  POKE 

6,0:  POKE  7,  138 
IF  PEEK  (190  «  256)  =  76 
THEN  PRINT  CHR»  (4) ; "PR#A 
$300 ":  GOTO  150 
POKE  54,0:  POKE  55,3:  CAL 
L  1002 

HGR  :  GOSUB  510 
HGR  :  HOME  :  GDBUB  600 
VTAB  19:  HTAB  16:  PRINT  " 
1":  HTAB  16;  PRINT  "2" 
FOR  I  =  0  TO  1 :  HCOLOR=  5 

+    I:    FOR   J    =   0    TO    1:    HPL 


DT    18, 147    +    J    +    8    «    I    TO 
52+B*I,147+J+8» 
NEXT 
HTAB    3:     PRINT    "T 

HTAB  14:  PRINT 
HTAB  2:  PRINT  "T 
; :  HTAB  13:  PRIN 


I;  NEXT 

S5  190  VTAB  21: 

0  MOVE"r 

"PRESB": 

NIB  HAND 

T  "THIS  KEY" 
BB  200  CH  =  213:  FOR  CV 
150  STEP  12 

NEXT 
3C  210  FOR  1  =  1 


138  TD 
GOSUB  770! 


£3  220 


u 

230 

4i 

240 

IE 

250 

U 

260 

5C 

270 

77 

2B0 

TO  4:DD(I)  =  10 
FOR  J  =  1  TO  7: DP (I, J) 
=  0:  NEXT  !  NEXT 
HH  =  84: HV  =  35: MH  =  83: M 
y  =  24 

IF  GM  =  4  THEN  410 
NW  =  0:TH  =  INT  (  RND  (1) 

*  12)  +  1:TM  =  INT  (  RND 

(1)  t  60) 
IF  6M  =  1  THEN  TM 
IF  GM  =  2  THEN  TM 
INT  <TM  /  30) 
IF  6M  =  3  THEN  TM 
NT  (TM  /  5) 

HR  =  TH:MN  =  TM:  GOSUB  61 
0 


0 
30    * 


5    *    I 


<•• 


rJfsTOo    M%, 


C5 

290 

*C 

300 

4F 

310 

CF 

320 

FRJSS  SETORH  TO  mum,  esc  foe  r.im 


"Hickory,  Dickory,  Dock"  for  Apple 
computers  offers  children  a  fun  way  to 
learn  about  telling  time. 


HR  =  1:MN  =  0 
VTAB  24:  HTAB  2:  PRINT  "P 
RESS  RETURN  TD  ANSWER,  ES 
C  FOR  MENU"; 
GOSUB  670 

GOSUB  460:  IF  A*  =  CHR«  ( 
27)  THEN  150 

IF  At  =  CHR«  (13)  THEN  35 
0 

BDTO  310 

IF  TH  =  HR  AND  TM  =  MN  TH 
EN  390 

IF  NW  <  3  TH 
HTAB  2:  PRINT 
HTAB  5:  PRINT 

"THAT  IS  NOT  CORRECT,  TR 
Y  ABflIN";:  FOR  I  =  1  TO  1 
000:  NEXT  :  GOTO  300 
HR  =  TH:MN  =  TM:  BOSUB  67 
0:  VTAB  24:  HTAB  2:  PRINT 

SPC(  38);:  HTAB  7:  PRINT 

"THIS  IS  THE  CORRECT  ANS 
WER"; 
FOR  I  =  1  TO  1500:  NEXT  : 

GOTO  240 
VTAB  24:  HTAB  2:  PRINT  SP 
C(  38); :  HTAB  10:  PRINT  " 
CORRECT!  GOOD  ANSWER"; 
FOR  I  =  1  TO  1000:  NEXT  : 

GOTO  240 
VTAB  24:  HTAB  11:  PRINT  " 
PRESS  ESC  FOR  MENU"; 


33  330 

U   340 
23  350 


*7  360  NW  =  NW  +  1 

EN  VTAB  24: 

SPCt  38) ;: 


C8  370 


BE 

380 

37 

390 

7F 

400 

DD 

410 

B?  420  HR  =  1:MN  =  0 

It   430  BOSUB  610:  BOSUB  670 

04  440  BOSUB  460:  IF  A»  =  CHR$  ( 

27)  THEN  150 
!C  450  GOTO  430 
2A  460  VTAB  24:  HTAB  1:  GET  A*: 

IF  A«  =  CHR»  (27)  THEN  RE 

TURN 
94  470  IF  A«  "    CHR«  (13)  THEN  RE 

TURN 


THEN  HR 


(HR 


12): 


THEN  MN 


(MN 


55)  ; 


HR 
RET 


MN 
RET 


PRINT 


PRINT  "2 


IE  4B0  IF  A«  =  "1" 

+  1  -  12  » 

URN 
EF  490  IF  A*  -    "2" 

+  5  -  60  « 

URN 
14  500  GOTO  460 
5i  510  TEXT  :  HOME  :  VTAB  6:  HTA 

B  B:  PRINT  "PRESS  KEY  TO 

CHOOSE  GAME: " 
U   520  VTAB  10s  HTAB  7: 

!  HOURS  TEST" 
E8  530  VTAB  12:  HTAB  7: 

:  HOURS  AND  HALF  HOURS  TE 

ST" 
«2  540  VTAB  14:  HTAB  7:  PRINT  "3 

!  5  MINUTE  INTERVALS  TEST 

38  550  VTAB  16:  HTAB  7:  PRINT  "4 

!  PRACTICE" 
59  560  VTAB  18:  HTAB  7:  PRINT  "5 

:  QUIT" 
24  570  VTAB  24:  GET  A»:  IF  A*  < 

"1"  DR  A»  >  "5"  THEN  570 
58  580  IF  A«  =  "5"  THEN  END 
6E  390  GM  =  VAL  (A«)  :  RETURN 
H  600  FOR  I  =  1  TO  12:  VTAB  CY ( 

I):  HTAB  CX(I):  PRINT  ll 

NEXT  :  RETURN 


CE  610 

DE  =  1:HC  =  160! DC  =  INT 

(HR  /  10):  IF  DC  -  0  THEN 

DC  ■=  10 

AC  620 

IF  DC  <  >  DD(1)  THEN  BOSU 

B  790 

45  630 

DD(1)  -  DClHC  "  186: DE  = 

2: DC  -  HR  -  10  t  INT  (HR 
/  10):  IF  DC  <  >  DD(2)  TH 
EN  GOSUB  790 

4F  640  DDC2)  =  DC:  HC  =  220:  DE  = 
3: DC  -  INT  (MN  /  10):  IF 
DC  <  >  DD(3)  THEN  GOSUB  7 
90 

(4  650  DD(3)  =  DC:HC  =  246:  DE  - 
4: DC  =  MN  -  DC  «  10:  IF  D 
C  <  >  DD(4)  THEN  GOSUB  79 
0 

13  660  DD(4)  =  DC:  RETURN 

95  670  HCOLOR=  0:  GOSUB  700:  SOS 


A7  680 
E3  690 

F4  700 


DD(4)  =  DC 

HCOLOR=  0: 

UB  720 

GOSUB  690: 

URN 

A  =  (HR  /  6  +  MN 

PIsHV  -  68  -  33 
)  !  HH  ■=  84  +  44  * 

HCOLOR=  5 


BOSUB  710:  RET 


/  360)  » 
t  COS  (A 
SIN  (A): 


HPLOT  84,68  TD  HH,HV:  HPL 

OT  83,67  TO  HH  -  1 , HV  -  1 

S  RETURN 
94  710  A  -  MN  /  30  t  PI:MV  =  68 

-  44  *  COS  (A) :MH  =  83  + 

59  *  SIN  (A):  HCDLOR=  6 
DC  720  HPLOT  84,68  TO  MH,MV:  HPL 

OT  83,67  TO  MH  -  1,MV  -  1 

:  RETURN 
45  730  FOR  I  =  -  2  TD  2:  HPLOT  C 

H  +  I,CV  -  4  +  {  ABS  (I) 

=  2)  TO  CH  +  I,CV  +  4  -  ( 
ABS  (I)  =  2) :  NEXT 
If  740  RETURN 
58  750  FOR  I  =  -  1  TO  1:  HPLOT  C 

H  -  5  -  (I  =  0) ,CV  +  I  TO 
CH  +  S  +  (I  =  0),CV  +  I: 
NEXT 
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23  760  RETURN 

27  770  HCDLaR=  2:  FOR  I  =  -  2  TO 

2!  HPLDT  CH  +  I,CV  -  2  + 

(  ABB  (I)  <  2)  TO  CH  +  I 

,CV  +  2  -  t  ABS  tIJ  <  2)  : 

NEXT 

27  730  RETURN 

(E  790  CI  =  0:CH  =  HC  +  10:  FDR 
CV  =  132  TO  156  STEP  12: 
QOSUB  830:  IF  DP(DE,CI)  < 
>  PC  THEN  GOSUB  750: DP (D 
E,Cn  =  PC 

FF  800  NEXT 

Jft  810  FDR  CV  =  138  TO  150  STEP 

12:  FOR  CH  =  HC  -i-  2  TO  HC 

+  la  STEP  16:  BOSUB  B30: 

IF  DP(DE,Cn  <  >  PC  THEN 

BOSUB  730: DP (DE, CI)  =  PC 

!£  820  NEXT  :  NEXT  :  RETURN 

CB  830  CI  =  CI  +  1:PC  =  VAL  <  MI 

D*  (SS»<DC),CI, n ) :  HCOLO 
R-  2  *  PC:  RETURN 

F8  840  FOR  I  =  35456  TO  I  +  72  S 
TEP  8:  POKE  1,128;  POKE  I 
+  7,128 

DB  850  FOR  J  =  1  TO  6:  READ  A:  P 
OKE  I  +  J,A:  NEXT  :  NEXT 
:  RETURN 

It   860  DATA  188,230,246,238,230, 

18B 
Bl  970  DATA  152,  156,  152.  152,  152, 

188 
75  880  DATA  188,230,176,140,230, 

254 
BB  890  DATA  180,230,176,224,230, 

188 
fF  900  DATA  176,184,180,254,176, 

176 

50  910  DATA  254,134,190,224,230, 

IBB 
79  920  DATA  188,134,190,230,230, 

1B8 
U   930  DATA  254,224,176.152,140, 

140 

M  940  DATA  188,230,188,230,230. 
IBS 

81  950  DATA  188,230,230,252,176, 

152 
E8  960  FOR  I  =  768  TO  I  +  87:  RE 

AD  A:  POKE  I, A:  NEXT  :  RE 

TURN 
ft*  970  DATA  216,120,133,69,134,7 

0 

51  980  DATA  132,71,166,7,10,10 
!E  990  DATA  176,4,16,62,48,4 

A2  1000  DATA  16,1,232,232,10,134 

♦S  1010  DATA  27,24,101,6,133,26 

aO  1020  DATA  144,2,230,27,165.40 

7F  1030  DATA  133,8,165,41,41,3 

6B  1040  DATA  5,230,133,9,162,8 

28  1050  DATA  160,0,177,26,36,50 
73  1060  DATA  48,2,73,127,164,36 
57  1070  DATA  145,8,230,26,208,2 
ftF  1080  DATA  230,27,165,9,24,105 
IF  1090  DATA  4,133,9,202,208,226 

1100  DATA  165,69,166,70,164,7 
1 
5C  1110  DATA  80.76,240,253 

1120  FOR  DC  =  0  TO  10:  READ  S 
S»(DC):  NEXT  :  RETURN 

82  1130  DATA  1011111,0000101,111 

0110, 1110101 
1140  DATA  0101101,1111001,111 

1011, 1000101 
1150  DATA  1111111,1111101,000 
0000 
*2  1160  FQf?  I  -  1  TO  12:  READ  CY 

(I),CX(I):  NEXT  :  RETURN 
K    1170  DATA  2,18,5,22,9,23 
2J  1180  DATA  13,22,16,18,17,12 
5B  1190  DATA  16,6,13,2,9,1 
45  1200  DATA  5,2,2,6,1,12 


71 


Dl 


H 


BE 


Program  4:  Hickory, 
Dickory,  Dock  For  IBM 
PC/PCjr 

Version  by  Tim  Victor,  Editorial 

Programmer 

For  instructions  on  entering  this  listing,  please 

refer  to  "COMPUTEI's  Guide  to  Typing  In 

Programs"  in  this  issue  of  compute!. 

n    10    KEY  OFF:RANDDHIZE  TIMER 
m   20  DIM  DD(4) ,DS(4,7) ,SS*(I0) , 

CH(12) ,CV<12) 
m   30  DIM  DH(5) ,DV(5) 
FB  40  PI=4«ATN<1} 
HP  50  GOSUB  900:  GOSUB  940:  GDSUB 

B40 
Efi  60  GDSUB  300 
KC  70  SCREEN  1 
CH  80  QDSUB  530:  GOSUB  540:  GOSUB 

400 
CH  90  FOR  CP=0  TO  3:DD(CP)=10:FO 
R  SN=1  TO  7:DS(CP,SN)=0:NE 
XTiNEXT 
Jf  100  HH=S4:HV=36:MH=84;riV=21 
BI  110  IF  GM<4  THEN  160 
Dfl  120  HR=1:MN=0: BOSUB  700: GOSUB 

550 
Id  130  LOCATE  25,1I:PRINT  "Press 

Esc  to  quit"; 
PH  140  GDSUB  500:  IF  K*=CHR*(27) 

THEN  60 
SC  1S0  GOSUB  700:  GDSUB  550:GOTD 

140 
Pft  160  NC=0 

»B  170  NW=0:HR=lNTC12*RND(in+l 
THEN  MN=0 
THEN  MN=30*INT(2« 


180 
190 


IF  BM=1 

IF  GM=2 

RND ( 1 ) ) 
00  200  IF  GM=3  THEN  MN=s5*INT  ( 12* 

RND ( 1 ) > 
lit  210  GDSUB  700:TH=HR:TM=MN:HR= 

1 : MN=0 
IS  220  LOCATE  25, 3:  PRINT  "Press 

Enter  to  answer.  Esc  to  q 

uif '; 
EJ  230  K»="": WHILE  K*<>CHR*(27) 

AND  K»<>CHR*( 13): QDSUB  55 

0: QOSUB   500: MEND 
PL   240    IF    K*=CHR»C27)     THEN    60 
Cft   250    LOCATE    25,3: IF    HR=TH    AND 

MN=TM    THEN   280 
IH   260    NW=NH+1:IF    NW<3    THEN    PRIN 

T    SPACE«(B)     "That's    not    c 

orrect"SPACE«(8) ; sNC=0:FO 

R  DLAY=1  TO  500: NEXT: SOTO 
220 
LB  270  HR=TH:MN=TM: GOSUB  550: PRI 

NT  SPACE*  (4)  "Ttnis  is  the 
correct  answer"  SPACE* (4 

);sFOR  1=1  TO  1500: NEXT: B 

OTD  170 
JD  280  PRINT  SPACE*  (10)  "You're 

right!"  SPACE* ( 1 1) ;: NC=NC 

+1:IF  NC=5  THEN  NC=0:GOSU 

B  460 
fiB  290  FDR  DLAY=1  TO  1S00:NEXT!B 

OTO  170 
KO  300  SCREEN  0:  WIDTH  40:CLS 
BB  310  LOCATE  6,8:  PRINT  "Press  k 

By  to  select  gdrre:  " 
DK  320  LOCATE  8, 5:  PRINT  "1.  Hour 

s  test" 
IS  330  LOCATE  9, 5:  PRINT  "2.  Hour 

B  and  half  hours  test" 
LH  340  LOCATE  10,5:PRINT  "3.  Fiv 

B    minute  intervals  test" 
DH  350  LOCATE  11. 5:  PRINT  "4.  Pra 

ctice" 
HC  360  LOCATE  12, 5:  PRINT  "5.  Qui 

t" 
NA  370  K4=INPUT«(1):  IF  K«<"1"  OR 
K»>"5"  THEN  370 


"Hickory,  Dickory,  Dock"  for  the  IBM 

PC/PCjr. 


JK  380  IF  K«=."5"  THEN  END 

Pft  390  GM=VAL(K«): RETURN 

IE  400  LOCATE  1.23: PRINT  "  To  mo 

ve     Press"; 
06  410  LOCATE  2,23:PR1NT  "this  h 

and  this  key"j 
CS  420  LOCATE  4,  37:  PRINT  "  1  "  :  LOG 

ATE  5. 37: PRINT  "2" 
DF  430  LINE  (196,  27) -(235, 28) .  2, 

BF 
Pft  440  LINE  (196,3S)-(235,36),1, 

BF 
HI    450    RETURN 
CP  460    PLAY    "nintl80o3iagggaaal2g 

I4n018gl4elBel4f IBf 12el4n 

0" 
LC  470    PLAY    "18el4cl8cl4el8el4dl 

adl4a. " 
tft  480    PLAY    "nill8gag-fedI4c.  " 
H«   490    RETURN 
Fl    500    K*=INPUT*(I)  ;IF    K*="\"    TH 

EN    HR"HR+1+12»(HR=12) 
Eft   510    IF    K*="2"    THEN   MN=«N+5+60 

» (MN-55) 
fID   520    RETURN 
OH   530    FOR    1  =  1    TO    12:L0CATE    CV  ( I 

) ,CH{I) : PRINT   MIDS(3TR*(I 

) ,2) t NEXT: RETURN 
BS  540    LH=24l!F0R    LV=128    TO    149 

STEP    21:  LINE    (LH,  Lii/)  -  tLH+ 

5, LV+6) ,3, BFs  NEXT! RETURN 
W  550    LINE    (84,76)-(HH,Hy) ,0 
DN   560    LINE     CS3,75)-(HH-l,HV-n  , 

0 
HL   570    LINE     t84,76)-{MH,MV),0 
61   580    LINE     (B3,75)-(MH-J,MV-1), 

0 
IB   590    HH=84+48*SIN(PI»(HR/6+MN/ 

360)  ) 
FH   600   HV=76-40»COS(PI»(HR/6+MN/ 

360)  ) 
CH  610  LINE  (a4,76)-(HH,HV)  ,2 
6C  620  LINE  (83,75J-(HH-1,HV-1), 

2 
DO  630  MH=S4+63»SIN(PI»MN/30) 
IJ  640  MV=76-55»COS(PI«MN/30) 
DC  650  LINE  (B4,76>-(MH,MV)  ,1 
CD  660  LINE  (83,  75)  -  (MH-1 ,  MV-1 )  , 

1 
NO  670  RETURN 
HO  680  LINE  (a3,75)-(HH-l,HV-l), 

2 
EK  690  MH=B4+63»SIN(PI«MN/30> 
HK  700  CP=0:DC=INT(HR/10) : IF  DC= 

0  THEN  DC=10 
UK  710  QOSUB  760 
DL  720  CP=l:DC=HR-10tINT(HR/10)  : 

GOSUB  760 
CJ  730  CP=2:DC=INT(MN/10) sBOSUB 

760 
HH  740  CP=3:DC=-MN-10«DC:  GOSUB  76 

0 
HL  750  RETURN 
IP  760  IF  DD(CP)=DC  THEN  RETURN 

ELSE  DD(CP)"DC 
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m 

780 

in 

790 

FL 

800 

fp 

810 

JC 

820 

ID 

830 

LN 

840 

EE 

850 

LB 

860 

LO 

870 

LL   770    SN=0!FaR    SV=0    TO    40   STEP 
20:QOSUB    810: IF    DS<CP,SN) 
OHC    THEN    GOSUB    a20:DS(CP 
,SN!-HC 
NEXT 

FOR   SV=0    TO    20    STEP    20: FD 
R    SH-0   TO    24    STEP   24:BaSU 
B    810! IF    DS(CP,SN)<>HC    TH 
EN    BDSUB    B30!DS<CP,BN)=HC 
NEXT:NEXT:RETURN 
SN=SN+1:HC=(MID«(SS»<DC>, 
SN, 1)="1">:RETURN 
PUT     (174+CP«36-12t CCP>1)  , 
120+SV) , DH, XOR: RETURN 
PUT     (170+CP»36-12* (CP>1)+ 
SH , 1 23+SV ) , DV , XOR : RETURN 
SCREEN    1:CL3 

FOR  LV=0  TO  3: LINE  (1+(LV 
=1    DR    LV=2) ,LV)-(1B-(LV=1 

OR    LV=2) ,LV> ,3: NEXT 
GET     (0,0)-(19,3) ,DH:PUT     ( 
0,0) ,DH,XDR 

FOR  LH=0  TO  3:LINE  (LH,1+ 
(LH=1  OR  LH=2> )-(LH, 16"(L 
H=l    OR    LH=2) ) ,3: NEXT 

ON   880   GET     (0,0)-(3,  17)  ,DV:PUT     < 
0,0) ,DV,XDR 

NE   890    RETURN 

HB  900    FOR    DC=0    TO    10:  READ   SS«(D 
C) : NEXT: RETURN 

et  910  DflTfl  "leinii",  "0000101", 

"1110110", "1110101" 
go   920    DATA    "0101101",  "1111001", 

"1111011", "1000101" 
m   930    DPlTfi    "IIIIUI", "1111101", 

"0000000" 
OD   940    FOR    1  =  1    TO    12:REflD    CV<I>, 

CH(n:NEXT:RETURN 
m   950    DATA    2,16,6,20,10,21 
16   960    DATA    14,20,18,16,19,11 
FD   970    DATA    18,6,14,2,10,1 
nG  980    DATA    6,2,2,6,1,11 


Program  5:  Hickory, 
Dickory,  Dock  For  Atari  ST 

Version  by  Kevin  Mykytyn,  Editorial 
Programmer 

10  randomize  O:goto  30 

20  z  =  a*.0175:x  =  int(xc-xr*cos(z)):y  =  inl(y 

c-yr*sin(z));  return 
30  ch  =  16:gosub  470:openw  2:clearw  2:ful 

Iw  2;ohx  =  130;omx  =  130;ohy  =  75:omy 

=  75 
40nr  =  0:xr  =  70:yr  =  60:xc  =  130:yc  =  75:got 

oxy  0,5;color  6:print  "  1.  Test  -  hours" 
50  prlnt:prinl  "  2.  Test  -  hours  and  half  ho 

urs" 
60  prinl;print  "  3.  Test  -  five  minute  inter 

vals" 


t:^       :_^ .__0S5i!m.- 
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70  prinl:print  "  4.  Praciice";print:print  "  5 

.  Quit" 
80  k  =  inp(2):if  k<49  or  k>S3  then  80 
90  if  k  =  53  then  ch  =  6:gosub  470:end  els 

eif  k  =  32  then  250 
100  n  =  k-48:gosub  280 
110  hr  =  int(rnd(l)*12>  +  l:mn  =  0;if  n  =  2  th 

en  mn  =  int(rnd(I)  +  .5r30:goto  130 
120  if  n  =  3  then  mn  =  int<rnd(l)*12)*5 
130  gosub  380;amn  =  mn:ahr  =  hr:mn  =  0:h 

r  =  12 
140  gosub  340;gosub  420:if  k  =  113  then  30 
150  if  k<>13  then  140 
160  color  2;if  amnomn  or  ahrohr  the 

nI90 
170  nr  =  nr  +  l;goloxy  26,15:print  "Right!"; 

b  =  l:c  =  5;gosub  560 
180  nw  =  0:gosub  240:goto  220 
190  gotoxy  26,15;print  "Wrong!":b  =  S:C"=l 

:gosub  560 
200  gosub  240:hr  =  ahr:nin  =  ainn:nw  =  nw 

+  l;if  nw<>3  then  130 
210  gosub  340:for  td  =  l  to  4000:nexl;nw  = 

O;goto  230 
220  if  nr  =  5  then  nr  =  0;gosub  500 
230  for  t  =  l  to  500;next;goto  JIO 
240  for  td  =  l  to  300:next:sound  l,0:gotox 

y  26,15:print  "  ":return 

250  gosub  280 
250  gosub  340;go9ub  380:gosub  420;if  k  =  l 

13  then  30  else  260 
270  '  draw  the  dock 
280  clearw  2;color  1 
290  ch  =  6;gosub  470:gotoxy  3,17:print  "(H) 

ours        {MJinules        (Q)uit"; 
300  color  6:ch  =  16:gosub  470:nr  =  0:nw  =  0] 

for  q  =  l  to  12;a  =  q*30  +  90:gosub  20 
310  x=int(x/8):y  =  int(y/8):if  q  =  ll  or  q  = 

12  then  x  =  x-l 
320  gotoxy  x,y:print  q:next 
330xr  =  xr-7;yr  =  yr-7:xc  =  xc  +  28:yc  =  yc  + 

8:mn  =^  0:hr  =  12:return 
340  color  l,l,0:linef  xc,yc,omx,omy:lincf  xc 

,yc,ohx,ohy 
350  color  l,l,2:a  =  mn''6  +  90;gosub  20:line 

f  xc,yc,x,y;xr  =  xr/2:yr  =  yr/2 
360  color  l,l,4:oinx-=x:omy  =  y;a  =  hr*30  + 

90  +  mn/2:gosub  20:linef  xc,yc,x,y 
370xr  —  xr'2:yr='  yr*2iohx =x:ohy  =  y:retu 

rn 
380  color  5:goloxy  2,15;if  hr<10  then  prin 

t  "  "; 
390  q  =  hr:gosub  410;print  q$;":";;if  mn<l 

0  then  print  "0"; 
400  q  =  mn:gosub  410:print  q$:return 
410  qS  =  rightS(strS(q),len(str$(q))-l):rcturn 

420  k  =  inp(2);if  k  =  109  then  mn=mn  +  5:i 

f  mn=60  then  mn=0 
430  if  k  =  104  then  hr  =  hr  +  l 
440if  hr  =  13  then  hr  =  l 
450  if  k  =  104or  k  =  109  or  k  =  I3or  k  =  ll 

3  then  return 
460  goto  420 
470  poke  contrl,12:poke  contrl  +  2,l;pok 

e  conlrl+6,0 
480  poke  ptsin,0:pake  pfsin  +  2,ch 
490  vdisys  (0);return 
500  restore  520:for  nt  =  l  to  29;read  a,b,c 
510  sound  l,15/a/b,c'7:next:sound  l,0;retu 

rn 
520  data  8,5,1,10,5,1,8,5,1,6,5,1,5,5,1,3,5,1,1,5 

,S 
530  data  5,5,1,8,5,1,10,5,1,8,5,1,6,5,1,5,5,1,3,5 

,1,1,5,5 
540  data  5,5,1,3,5,2,3,5,1,10,5,3,8,5,2,8,5,1,1,6 

,3 
550  data  8,5,1,10,5,1,8,5,1,6,5,1,5,5,1,3,5,1,1,5 

,6 


560  for  a  =  b  to  c  step  2*sgn(c-b):80und  1,1 

5,a,6 
570  wave  l,l,14,5,5:next:return 


Program  6:  Hickory,  Dickory, 
Dock  For  Amiga 

Version  by  John  Krause 

CLEAH,30000- 

GOSTTB  inlt- 

loop:- 

MENU  1,0,1- 

IF  MENU(0)=  1  THEN  ON  MENir(l)  QOS 

UB  practice, hours, half, five, qutt" 

IF  p  THEW  GOSUB  SetClock- 

GOTO  loop- 

practice:- 

COLOR  3,0:LOCATE  2,17:PHINT  "  Practi 

oe  "- 

SAY  TRANSLATE $("praMiS.")" 

p  =  l:liour  =  0:minute  =  0:GOSUB  Updat 

eAnalog- 

HourDlgital  =  0:  MlnuteDlgital  =  0:  GOSU 

B  UpdateDigital- 

RETURK- 

hours;- 

p=-0:COLOR    3,0:L0CATE    S,17:PRINT    ' 

'  Hours  Test  "- 

SAY  TRAlTSLATBSC'llOUrs  teBt.")-- 

FOE  count  =  1  TO  5- 

MinuteDigltal  =  0;HourDigital  =  INT(R 

ND*12)*12- 

GOSUB  GetAnswer- 

NEXT- 

GOSUB  musio- 

RETURBT- 

half:- 

p  =  0:COLOR  3,0:LOCATE  2,17:PRIlSrT  "H 

alf  Houra  Tast"- 

SAY  TRANSLATESC'lialf  houra  test.")- 

FOR  count=l  TO  B- 

MliiuteDigltal  =  CmT(RKD)*72;HourDl 

gital  =  IITT(R1TD*1H)*  1 2- 

GOSUB  GetAnswer- 

NEXT- 

QOSUB  muaic- 

RETURN- 

five:- 

p  =  0:C0LOH    3,0:L0CATE    2,17;PRI1IT 

"  5  Minute  Test"- 

SAY  TRANSLATE$("fIve  minut  test.")^ 

FOR  count  =1  TO  5- 

MinuteDlgl  tal  =  INT(RND*  1 2)*  1  S:Hour 

D  Igital  =  INT(HKrD*  1 2)*  1 2- 

GOSUB  GetAnswer- 

NEXT- 

GOSUB  music- 

RETURW- 


Speech  synthesis  and  mouse  control  are 
featured  in  the  Amiga  version  of 
"Hickory,  Dickory,  Dock." 


qult:- 
SYSTEM- 
SetClOck:^ 
answer  =  O*- 

IF  M01JSEC0)=1  THEN- 
IF  MOUSB(3)>ES0  AUD  M0USE(3)<S9 
0  THEN- 

IF  M0UaEC4}>37  AND  M0uaE(4)<36  TH 
EW- 

GOSUB  InoHour- 

IF  p  THEBT  GOSUB  InoHourDigital- 
END  IF- 

IF  M0USE(4)>45  AND  M0TJ3E(4)<84  TH 
EN- 

aOSUB  IncMinute- 
IF  p  THEN  GOSUB  IncMinuteDigltal- 
END  IP- 

IF  MOUSE  (4)>  63  AND  M0USEC4)<72  AN 
D  p  =  0  THEN- 
COLOR  1,0- 

IF   IBrT(hour/12)  =  HourDlgital/113   AN 
D  minute  =  MlnuteDigital  THEN- 
LOCATE  10,23:PIIINT  "Correct!"- 
ans'wer  =  S:SAY  TRAUXSLATESC'corett.' 
')- 

ELSE- 
LOCATE  10,S3rPRINT  "Wrong!"- 
answer=l:SAY  TRANSLATES("wrong.' 
•)- 

END  IF- 

FOH  i  =  0  TO  SOOOiNEXT- 
LOCATE  10,g3:PHINT  SPACBSC9)- 
END  IF- 
END  IF- 
END  IF- 
RETURN- 
GetAnswertr 
MEND  1,0,0- 

GOSUB  UpiiateDigltal:wrong=0- 
loopl:  GOSUB  SetClock- 
IF  answer  =  0  THEN  loopl- 
IF  anawer  =  S  THEN- 
RETURN- 
ELSE- 

wrong = wrong  + 1  - 
IF  wrong<3  THEN- 
GOTO  loopl- 
ELSE- 

WHILE    MinuteDigitalomlnuteiGOSU 
B  IncMinute:WEND- 
WHILE  HourDlgltal/lSomrCtiour/ia) 
:GOSUB  IncHour:WEND- 
count^count-l- 
FOH  t=0  TO  4000;NEXT- 
END  IP- 
END  IF- 
RETUHU- 
musio:- 

FOR  i  =  0  TO  27: SOUND  f(i),t(i):SOUND  0, 
1:NEXT;RETURN- 
InoHourDigttal:- 

HourDigital  =  C01dHourDlgltal+ 12)  MO 
D  144- 

GOSUB  UpdateDigital- 
HETUHN- 
IncMlnu  teDlgltal;  - 

MlnuteDigital  =  (OldMinu  teDlgltal  + 12 
)  MOD  144- 

HourDlgLtal  =  (OldHourDigital  + 1)    MO 
D  144- 

GOSUB  UpdateDigltal- 
RETUHN- 
IncHour:- 

liour=(01clHour+12)  MOD  144- 
GOSUB  UpdateAnalog- 
RETURN- 
IncMlnute:- 
minute  =  (01dMinute  + 12)  MOD  144- 


hour  =(01dHour+l)  MOD  144- 

GOSUB  UpdateAnalog- 

RETURN- 

number;- 

COLOH  1,2- 

LOGATE  r(l),c(i)- 

IF  i>9  THEN  PRINT  "1";- 

PRINT  CHR£(48  +  Ci  MOD  10))- 

RETURN- 

UpdateDigital;- 

GOSUB  DrawDigltal- 

01dHourDigltal  =  HourDigital :  OldMinu 

teDigltal  =■  MinuteDigital- 

GOSUB  DrawDigital- 

RETURN- 

DrawDigital:- 

IF  01dHourDigita]<12  THEN  OldHourDi 

gital  =  OldHourDigital  + 144- 

IF  01dHourDigital>119  THEN  PUT  (165, 

139),d(0,l)- 

PUT  (200, 1 39) ,  d(0,(01dHourDigital  \  1 2 

)  MOD  10)- 

PUT   (24B,  139),dC0,  INT(01dMinuteDlglt 

ar5/120))- 

PUT  (2S0, 1 39) , d(0 , (OldMinuteDlgltal '5 

\12)  MOD  10)- 

RETURN- 

ClrAnalog:- 

GOSUB  MinutsHand- 

COLOR  giAREAJFILL- 

GOSUB  HourHand- 

AREAFILL- 

i  =  CINT(01dMiiiute/13):IF  i  =  0  THEN  1  = 

12- 

QOSUB  number- 

RETURN- 

UpdateAnalog: - 

GOSUB  ClrAnalog- 

01dMinute=minute:G08UB  MinuteHan 

d- 

COLOH  1:AREAPILL- 

01dHour  =  hour:  GOSUB  HourHand- 

AREAFILL- 

RETURN- 

MinuteHand:- 

AHEA  (cx,cy)- 

AREA  (cx+60*x((01dMinute+143)  MO 

D   1 44),cy  +  60*y ((OldMinu te+ 143)  MO 

D  144))- 

AREA  (Ci  +  80'i(01dMinute  MOD  144), C 

y  +  80*y(01dMinute  MOD  144))- 

AREA    (ox  +  60*x((01dMinute  +  l)    MO 

D  144),cy +  60*y((01dMinute+ 1)  MOD  14 

4))- 

RETURN- 

HourHand;- 

AHEA  (ox,cy)- 

AREA   (0X  +  40'x((01dHour  +  142)    MO 

D    144),cy  +  40*y((01dHour+142)   MO 

D  144))- 

AREA  (ex  +  50*x(01dHour  MOD  144), Cy 

+  50*y(01dHour  MOD  144))- 

AREA  (cx+40'x((01dHour+2)  MOD  144 

),cy  +  40'yC(01dHour  +  S)  MOD  144))- 

RETURN- 

inlt:- 

SAY  ""- 

SCREEN  2,320,200,2,1- 

WIND0W2,"  Hickory,  Diokory,  Dock  ",, 

2,2- 

PALETTE  0,.6,.6,.3- 

PALETTE  1,0,0,0- 

PALETTE  3,.7,.7,.7- 

PALETTE  3,0,0,0- 

DIM  a(300 ,6) , d(300,9) ,x(143).y(14g), r(l 

2),o(12),f(27),tC27)- 

MENU  1,0,1, "Test  "- 

MENU  l,l,l,"Practioe  "- 


MENU  1,2.1, "Hours  "- 

MENU  1,3,1,  "Half  hours"- 

MENU  1,4,1, "B  minute  "- 

MENU  1,5,1, "Quit  "- 

MENU  2,0,0,"":MBNU  3,0,0,"";MENU  4, 

0,0,""- 

RANDOMIZE  TIMER- 

pi  =  4*ATNCl):p  =  l- 

FOR  1  =  0  TO  143- 

xCi)  =  C0S(pi*(i/72-,6))- 

y(i)  =  SIN(pi*(l/7S-.6))*.84- 

NEXT- 

FOR  i-O  TO  6- 

CLS:READ  k- 

POR  J  =  1  TO  k;READ  x,y:AHEA  (x,y):NB 

XT- 

AREAFILL:GET  (0,0)-(32,46),a(0,l)- 

NEXT- 

FOR  j  =  0  TO  9- 

CLS:READ  aS- 

FOR  i  =  l  TO  7- 

IF  MIDS(a*,l,l)  =  "l"  THEN  PUT  (0.0),s( 

0,i-l)- 

NEXT- 

GET  (0,0)-(32,48),d{0J)- 

NEXT- 

CLS:ERASE  s- 

FOR  i  =  l  TO  12:READ  r(i),c(l):NBXT- 

FOR  i  =  0  TO  27:READ  f(i),Kl);NEXT- 

cx=100:cy  =  85- 

GIRCLE  (Gx,cy),100,l:PAINT  (cx,cy),l- 

CIRCLB  (cx,cy),90,S:PAINT  (cx,oy),2- 

COLOE  1,2- 

FOR  i  =  l  TO  1Z:G0SUB  number;NEXT- 

FOR  i  =  0  TO  143  STEP  12- 

CIRGLE  (□x  +  84*x(i),cy  +  84*yCl)),3- 

PAINT  (ox+84*x(i),cy+84'y(i))- 

NEXT- 

POR  i  =  0  TO  69- 

dx  =  COS(pi*(l/30-.5)):dy  =  SIN(pi*(i/3 

0-.5))- 

LINB  (ex  +  62*dx,  cy  +  69*dy)-STEP(4*dx, 

3'dy)- 

NEXT- 

LINE  (18B,13B)-(320,200),2,bf- 

CIRCLE  (236,151),3:PAINT  (236,151)- 

CIRCLE  (236,171),3:PAINT  (236,171)- 

GOSUB  DrawDigital- 

LOGATE  4,23;PRINT  "  Hours  "- 

LOCATE  6,23;PRINT  "Minutes"- 

LOCATE  8,23:PRINT  "  OK?  "- 

SAY  TRANSLATESC'weloome  to  hiokor 

y  dickory  dock.")" 

GOSUB  practlce- 

RETURN- 

DATA  4,0,1,0,31,4,19,4,6- 

DATA  4,1,0,26,0,22,4,6,4- 

DATA  4,27,1,27,21,23,19,23,5- 

DATA  4,27,23,27,43,23,39,23,26- 

DATA  4,26,44,1,44,5,40,22,40- 

DATA  4,0,43,0,23,4,25,4,39- 

DATA  6,1,22,6,20,22,20,26,22,21,24,6,2 

4- 

DATA   1111110,0011000,0110111,0111 

101,1011001- 

DATA    1101101,1101111,0111000,1111 

111,1111101- 

DATA   4,14,7,17,10,18,13,17,16,14,17,1 

1- 

DATA  16,7,13,4,10,3,7.4.4,7.3,10- 

DATA  783.99,2,763.99,2,783.99.2,880,2 

,880,2,880,2,783.99,11- 

DATA  783.99,2,659.26,6,669,26,2.698.4 

6.6,698.46,2,669.26.11- 

DATA  669.26,2,623.26,3,523.25,2,659.2 

6,6,659.26,2,687.33,6,687.33,2,880,8- 

DATA  783.99,2,880,2,783.99,2,698.46,2 

,669.26,2,587.33,2,523.23,11-  @ 
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Reviews 


Philips  CD-ROIVI  And 

The  Electronic  Encyclopedia  For  IBi^ 


Tony  Roberts,  Production  Director 

Requirements:  IBM  PC  with  at  least  256K 
RAM.  Versions  for  other  personal  com- 
puters expected  soon. 

Recent  years  have  unleashed  an  infor- 
mation explosion — an  uncoordinated, 
unmanaged  proliferation  of  data.  New 
developments,  however,  indicate  that 
we  stand  poised  to  harness  this  data 
and  place  the  immense  power  of  the 
information  age  at  the  fingertips  of  any- 
one with  access  to  a  personal  computer. 

The  harbinger  of  this  new  era  is  the 
hardware/software  combination  of  a 
CD-ROM  (Compact  Disc-Read  Only 
Memory)  player  and  a  compact  disc 
containing  up  to  600  megabytes  of  digi- 
tized data.  The  first  such  combination 
available  is  the  Philips  CMIOO  player 
and  Grolier's  The  Electronic  Enojclopedia. 
Available  now  for  the  IBM  PC  and  com- 
patibles, this  package  is  an  exdting  look 
at  the  future  of  information  retrieval. 

The  Electronic  Encyclopedia  is  a  20- 
volume,  nine-million-word  encyclope- 
dia with  cross-referenced  index 
encoded  on  a  five-inch  plastic  disc 
(with  about  two- thirds  of  the  disc  to 
spare).  Using  this  disc,  a  CD-ROM 
player,  and  an  IBM  PC  running  Acti- 
venture  Corporation's  Knowledge  Re- 
trieval System,  it's  possible  to  access  any 
article  in  the  encyclopedia  in  seconds. 
In  fact,  you  can  find  every  occurrence  of 
any  keyword  throughout  the  entire 
encyclopedia. 

The  System 

The  Philips  CMIOO  system  consists  of 
the  CD-ROM  drive  itself,  a  tan  box 
about  14  inches  wide,  6  inches  high, 
and  10  inches  deep;  an  interface  card, 
which  occupies  one  of  the  full  slots  in 
the  IBM  PC;  and  a  connecting  cable. 
Everything  can  be  set  up  in  a  matter  of 
minutes.  The  disc  player,  incidentally, 
cannot  play  audio  compact  discs,  al- 
though the  technology  is  quite  similar. 
Activenture's  Knowledge  Retrieval 


System  is  the  link  between  you  and  the 
CD-ROM.  It's  so  simple  to  operate  that 
the  94-page  instruction  manual  is  prac- 
tically superfluous. 

The  left  quarter  of  the  screen 
shows  the  commands  available  by 
pressing  one  of  the  ten  function  keys  on 
the  IBM.  For  instance,  the  Fl  key,  la- 
beled About  Keys,  displays  a  map 
showing  you  where  you  are  in  the  pro- 
gram and  offers  help  on  any  of  the 
functions  available.  The  remainder  of 
the  screen  displays  options  for  your 
searches  and  the  articles  you  call  up, 

A  Simple  Search 

After  viewing  the  title  screen  and  press- 
ing the  function  key  labeled  Word 
Search,  you're  ready  to  begin  sifting 
through  the  encyclopedia.  Let's  say 
you're  looking  for  references  to  the  sub- 
ject "information  age." 

Following  the  onscreen  prompts, 
you  can  ask  the  computer  to  search  for 
the  word  information  along  with  the 
word  age  occurring  anywhere  in  the 
same  article.  Within  seconds,  a  message 
is  flashed  on  the  screen  that  1,472  oc- 
currences of  the  word  information  have 
been  found.  Then  the  display  indicates 
that  3,221  occurrences  of  the  word  age 
have  been  located.  Putting  the  two 
words  together,  the  program  finally  re- 
ports that  there  are  228  occurrences  of 
the  words  information  and  age  in  117 
articles. 

That's  probably  more  than  you 
bargained  for.  To  narrow  things  down, 
you  can  instruct  the  computer  to  look 
only  for  occurrences  of  the  two  words 
within  the  same  paragraph.  Seconds 
later,  the  program  reports  finding  33 
occurrences  in  15  articles,  including 
pieces  on  animal  behavior,  insurance, 
census,  and  poison. 

Narrowing  the  search  parameters 
further,  you  can  specify  that  information 
and  age  must  appear  in  exact  order:  that 
is,  "information  age."  This  time,  the 
program  finally  reports  that  there  are 
two  occurrences  in  one  article.  When 
you  press  F4,  Show  Titles,  the  program 


loads  and  displays  the  titles  of  the  arti- 
cles located  during  the  search.  In  this 
case,  the  article  you're  probably  inter- 
ested in  is  "Information  Science." 

Pressing  F2  loads  the  article  and 
displays  the  paragraph  containing  the 
first  reference  to  the  search  words.  The 
search  words  are  highlighted  through- 
out the  article,  so  it's  easy  to  scan  it 
using  the  function  keys  labeled  Next 
Page  and  Previous  Page  to  End  your 
information  quickly.  As  it  turns  out,  the 
"Information  Science"  article  has  only 
one  relevant  paragraph  relating  to 
"information  age"  (the  other  occur- 
rence of  the  phrase  appears  in  the  bibli- 
ography at  the  end  of  the  article).  To 
print  out  a  hardcopy,  you  can  press  F7, 
Make  Copy.  The  result  is  the  following 
paragraph: 

It  is  common  to  speak  of  the 
present  as  the  Information  Age,  or  to 
refer  to  the  information  explosion. 
About  50  percent  of  all  workers  in  the 
United  States  today  are  in  some  way 
involved  in  information  processing. 
Many  people  do  not  receive  the  right 
information  at  the  right  time,  how- 
ever, because  they  are  not  aware  the 
information  exists,  because  they  do 
not  know  where  to  look  for  it,  or 
because  it  is  buried  in  a  mass  of  extra- 
neous information  and  is  difficult  to 
find. 

Plenty  Of  Options 

There  are  many  options  available  after 
choosing  Make  Copy.  You  can  copy  the 
article  or  parts  of  it  to  a  printer,  or  save 
it  to  disk.  You  can  select  printer  mar- 
gins, line  spacing,  hyphenation,  and 
justification,  if  you  like.  If  you're  saving 
to  disk,  you  can  save  it  in  ASCII  text 
format,  in  a  WordSfar-compatible  for- 
mat, or  in  a  PRINT  format. 

Only  A  Beginning 

This  description  of  using  The  Electronic 
Encyclopedia,  and  the  encyclopedia  it- 
self, are  only  beginnings.  Much  more 
complex  searches  are  possible  by  using 
wildcards  and  negating  certain  words. 
For  example,  you  could  search  for  horse 
but  not  iron  to  eliminate  articles  about 
steam  engines  from  your  research  on 
equestrians.  Another  timesaving  fea- 
ture is  the  Outline  option.  If  you  find 
yourself  mired  in  a  complex  article. 
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COMPUTEi's  All  New  Apple  Applications  Special 

COMPUTErs  latest  Apple  Applications  Special  features  in-depth  articles  and  interviews, 
all  the  inside  news  about  Apple,  clearly  written  tutorials,  software  buyer's  guides,  new 
product  information,  and  valuable  ready-to-type-in  programs  for  all  Apple  users. 


COMPITErs 


Mocintosh 

The  DetxiT  0(  The 


i 


Revjevn 

fiotanc©  of  Pofior 

fantavisian 

Maryjgfrtg  Vbur  Monsy 


>V^*>t4l<MW 


CrAota  And  Dafra 

On  ¥nj  ApF«  I  ^r'-  - 


Apple  owners  find  these  special  Apple 

Issues  the  most  umferstandable, 

complete,  and  valuable  resources 

available  today. 


PLUS 

All  the  programs  in  COMPUTERS  Apple  Applications 
Special  are  also  available  on  a  timesaving  disk, 
ready  to  run  on  your  Apple  II,  II +,  lie,  and  lie. 
The  Disk  costs  only  $12.95  (plus  $2.00  shipping 
and  handling)  and  gives  you  immediate  access  to 
all  the  great  programs  in  this  special  issue. 

Look  for  the  Spring/Summer  1986  issue  of 
COMPUTEl's  Apple  Applications  Special  on  sale 
where  you  buy  other  COMPUTE!  publications,  or 
order  directly  from  COMPUTE!.  This  special  issue 
goes  on  sale  April  8,  1986. 

Send  in  the  attached  order  card  or  call  toll  free 
800-346-6767  (in  NY  caU  212-887-8525). 


Features 

•  Business  Applications 

'86  Apple:  An  Interview  with  John  Scully 

A  wide-ranging  interview  with  the  president  of  Apple.  The 
company's  plans  for  the  coming  year,  its  markets,  the  new 
Macintosh,  and  the  viability  of  the  Apple  II, 
Business  Software  Buyer's  Guide 

A  buyer's  guide  to  the  newest  Apple  11  and  Macintosh  word 
processors,  databases,  spreadsheets,  and  more. 
The  Expanding  Mac 

•  Education 

Apple  Rules  the  Schools 

Why  does  Apple  have  a  lock  on  educational  computing? 
Comments  from  teachers,  administrators,  and  Apple. 
Computers  and  the  Humanities 
Educational  Software  Buyer's  Guide 

•  The  Expanding  Apple 
If  s  New  n 

A  multitude  of  new  hardware  and  software  for  the  Apple  II 
line — from  color  printers  to  Mac-like  software — is  evaluated. 
Weirdware:  Off  the  Beaten  Software  Path 

Werrdware — out  of  the  ordinary  software — can  turn  the  Apple 
11  or  Macintosh  into  a  telescope,  astrological  fortune-teller,  baby 
evaluator,  and  much,  much  more. 
MacAdds:  More  for  the  Macintosh 

Applications 

•  utilities  and  Tutorials 
Windows 

Create  Macintosh-style  windows  on  any  Apple  Il-series 
computer.  Set  window  size,  open,  close,  and  retrieve  information. 
Mouse  Cursor 

A  Macintosh  BASIC  utility  for  altering  the  mouse  pointer. 
Design  data  can  be  saved,  then  used  in  other  BASIC  programs. 

Your  Personal  Ledger 

A  complete  personal  financial  application  for  tracking 
expenses,  income,  and  assets.  Easy  to  use,  and  packed  with  features 
from  report  generation  to  customized  category  codes. 
Personal  Publishing  With  Your  Macintosh 

Tutorial  and  guide  to  using  such  software  as  MacPaint  and 
MacWrite  to  customize  letterheads,  cards,  banners,  and  more. 
Keynote 

•  Education  and  Recreation 
Lexitron 

Entertaining  word  game  where  players  try  to  beat  the  clock 
while  finding  as  many  hidden  words  as  possible. 
Backgammon 

Play  the  computer  in  this  classic  game.  This  version  observes 
all  the  rules  of  standard  backgammon. 
Apple  Automatic  Proofreader 


1^  Publicationsjnc.® 

les,  Inc.  ^^^ 


Port  of  A8C  Consumer  Magazines, 

One  ot  ttie  ABC  Publishing  Companies 

825  7tfi  Avenue,  6th  Floor.  New  YoiK.  NV  1(X)1<? 

Pljatffton  o#  CC3M^TEi.  COMPUTED  Gazette,  CCJIPUTEij  etMSTle  Ojk.  COWUTEI  BookJ.  end  COMPUTE' s  AppJa  ADPfccatsjns 


THE  CMO  ADVANTAGE  HOIVIE  COMPUTERS 


THE  BEST  PRICES! 

Next  day  shipping  on  all  in  stoct< 

iiems. 

Free  easy  access  order  inquiry. 

Orders  from  outside 
Pennsylvania  save  state  sales 
lax. 

^  Free  technicial  support  witti  our 
factory  trained  technical  staff. 

u'  There  is  no  limit  and  no  deposit 
on  C.O.D.  orders. 
There 's  no  extra  cfi  arge  for  using 
your  f\/lasterCard  or  Visa.  Your 
card  is  not  charged  until  we  ship. 

No  waiting  period  for  cashiers 
checks. 


CALL  TOLL-FREE 
1-800-233-8950 

Educational  Institutions 
Call  Toil-Free 

1-800-221 -4283 

CUSTOMER  SERVICE 

&  TECH  SUPPORT 

1-717-327-1450 
DEPT.  A205 


Computer  Mail  Order 
DEPT.  A205 

477  East  Third  Street 
Williamspon,  PA  17701 

^^ 

MEMBES  OlHECT  MABKETING  ASSOCIATICN 

CREDIT  CARDS 


?J 


fSl 


•!l 


SHIPPING 


Add  3%,  minimum  S7.00  shipping 
and  handling  on  ali  orders.  Larger 
shipments  may  require  additional 
charges. 

All  items  subject  to  availability  and 
price  change. 

Returned  shipments  may  be  sub- 
ject to  a  restocking  fee. 


APPLE 

APPLE  lie CALL 

APPLE   lie - CALL 

lie  LCD  D>SBlav - CALL 

ATARI 

65XE  (64K) CALL 

130XE   [128K} CALL 

520ST  (S1 2K) CALL 

800XL  64K CALL 

lOiO  Recorder 349.99 

1050  Disk  Drive ...CALL 

1020  Printer S29  99 

1027  Leiier  Quality  Primer S12900 

1030  Direct  Connecl  Modem S59  99 

Comreit  220  Alan.  S69  99 

COMMODORE 

C64  Pachage 

CM,  C1541.  CiaiK $559.00 

C1ZB  Computer 5269.01 

C1571  (Disk  Dti»e  for  C128) S249.00 

Ct902  (RGB  13"  f«IOflilor  lor  C1Z8 CALL 

C1670  IModem  lor  C12e) S179.0CI 

C1530  Dalaseite S39-99 

C1660  Auto  Modem S69  99 

DPS  1101  Daisy  Primer S339,00 

Corrirex  £20  (C64  Interlace) S39.99 

Xetsc  SuperGraphlx  8K S69  99 

■Polaroid 

Palette S1399.0O 

Power  Processor 3229,00 

IllumiralsO  Slide  Mounter $39.99 

Polacolor  2  Pack  film S1B,99 

CURTIS  POWER  STRIPS 

Diamond  SP-1 S32. 

Emerald  SP-2 S39.99 

Sapphire   SPF-1.... $52,99 

Ruby  SPF-E J59.99 

Safe  SIrip  SP-3 S19.99 

KENS1NQT0H 

Masterpiece S99.99 

MaslerPiBce  Plus St  19.00 


PORTABLE  COMPUTERS 


Wh'3%  HEWLETT 
m^ltM   PACKARD 

41CV 3139.00 

<11CX S199.0O 

,HP  1 1C $49.99 

HP  12C S75.99 

HP  15C S75.99 

HP  16C $99-99 

HPIL  ll^OdUle S98.99 

HPIL  Cassette  or  Printer S359.99 

Card  Reader S143.99 

Extended  Function  Module SS3.99 

Time  l^odule S63.99 

W*  (tack  th*  lull  Una  of 
HP  cslculitor  products 

NEC 

PC-8401    LS CALL 

PC-a20i  Ponable  Computer... ,3339.00 

PC-823T  Disk  Drive 1599.00 

PC-a22lA  Triermal  Primers $149.00 

PC.8Z81A  Oaia  flecorder $99.99 

PC-32O1-0B  BK  RAM S79.99 

SHARR 

PC-1350 S149.00 

PC-1261 $149.00 

PC-15O0A $169.00 

PC-1250A $89.99 

CE-125  Prinier/CassBllB $129.00 

CE-150  Color  Printer  Cassette. $149, 00 
CE-161   IBK  RAM S129.00 


SOFTWARE 


ARTWORX 

Bridger  4.0  (All) $17.99 

Sirip  Poker  (Ail) ,,$19.99 

ATARI 

ROMS  FOR  ATARI  ONLY 

8036  Atari  Writer $24.99 

Star  Baiders $4.99 

Missile  Command S4,99 

Defender $4.99 

Galaxian $4,99 

Asteroids $4.99 

Centipede $4.99 

BRODERBUND 

Print  Shop  (All) $29.99 

Graphics  Library  I.  It,  III  (All) $17.99 

Bank  Street  Writer  (64,  AT) $34.99 

Bank  Street  Writer  |lle/llc) ,..$44.99 

BATTERIES  INCLUDED 

Paperclip  (AT.  64/128) S37  99 

Paperclip  (lle/llc) S44.99 

Honepack  (64(AT) S29.99 

D,E.G.A,S.   (520) S27.99 

COHTINiNTAL  SOFTWARE 

Home  Accountant  (All) S44.99 

Tax  Advantage  (All), 344.99 

Home  Accl./Tax  Bundle  (All) 359,99 

JAHE 

WordproJdBase  (C64) $39.99 

MICROPROSE 

Kennedy  Approach  (Ail) S24.99 

Aerojet  (All) $24  99 

Silent  Service  (All) $24.99 

PFS 

File   (64) $39,99 

File.  Report,  Graph  (lle/llcl $79  99 

VVnle  w/Proot  (ille/llc) $79  99 

PSI 

Fleet  Syslems  III  (C128) $59.99 

SPRINGBOARD 

Newsroom  (64) $34.99 

Clip  Ans  (64) $22.99 

Newsroom  (Apple) $39.99 

Clip  Arts  (Apple). $22  99 

SUBLOQIC 

Fligtii  Sjmulalor  (All) $37.99 

Jet   (64) 337.99 


MODEMS 


DISKETTES 


maxell 

3"/   SS(DD  (10) $18.99 

3'.'    DS/OD  (10) $29  99 

5'j"  MD-1  w/Hardcases  (10),   ,,S1].99 

5U'   MD-2  w/Hardcases  (10) S16.99 

5'^'    MD-2-HD  lor  AT  (10) $32.99 

3' J     5  pack  SS(DD/Case $10,99 

'1  Verbatim. 

5W  SS/DD $1B.99 

5V."  DS/DD $24.99 

Disk  Analyzer $24.99 

Elephant  S'/i"  SS/SO $13.99 

Elephant  SV»"  SS/DD $14.99 

Elephant  51/4"  DS'OO $16.99 

Elephant  Premium  DS/OD(50)... .579.99 
Elephant  3V!"  SSJDD $29.99 

5VV  DS/OD  floppy  disks 

(Box  of  10) $26.99 

DISK  HOLDERS 

INNOVATIVE  CONCEPTS 

Fiip'n  File  10 $2.99 

Flip'n  File  50 $14.99 

Flip'n  File  SO  w/lotk 519,99 

Flip'n  File  100 $19.99 

Flip'n  File  Data  Case $9.99 

AMARAY 

50  Disis  Tub  S'A" 89.99 

30  Disk  Tub  3W $9.99 


-•iNCHOft 

Volksmodem $69,99 

Volksmodem  300/1200 ,.$189,99 

Signalman   Express $259,00 

Lightning  2400  Baud $399,00 

Expressi  (PC  t^alfcard) 3189.00 

6470  (64/128)  300/1200  Baud  .3139.00 

DIOITAL  DEVICES 

AT300  ■  300  Baud  (Atari) S99  99 

dlHayes 

Smartmodem  30O .,  , ..$139.00 

Smanmoctem  1200 $389.00 

Smanmodem  1200B $359  00 

Smanmodom  2400 $599,00 

tiSicromodem  lie S149.00 

Sman  Com  II $8999 

Chronograph .5199,00 

Transet  lOOO $309.00 

/isr 

Reach  1200  Baud  Hall  Card.. ..$399.00 


K9    SUPRA 

MPP-1064  AD/AA  (C-64) $69.99 


[Novation  |jB 

Smart  Cat  Plus $299.00 

J-Cat 599.99 

Novation  2400 $549.00 

Apple  Cat  II 3229.00 

212  Apple  Cat  II $379.00 

Apple  Cat  212  Upgrade $229.00 

Macmodem $279.00 

Ouadmodem  II 

300/1200 5339,00 

300/1200/2400 $499,00 

EVEREX 

1200  Baud  Internal  (IBM/PC)... $179.00 


DRIVES 


HARD 

A110H  Single  10 CALL 

A210H  10  +  10 CALL 

A120H  Surge  20 CALL 

A220H  20  +  20 CALL 

Save  on  to  &  20  Carts CALL 

TAUOWtlS 

nCHHoiooiis 

25,  35,  50,  80  rneg  (PC) 

(rom$1299,00 

IRWIN 

Tape  Backup CALL 

^^:^VEREJ^ 

(jO  Meg  Internal  Backup  SystemS799.G0 
CORE 

AT20-AT72MB CALL 

PRIAM 

40,  60  MB  (PC,  XT,  AT) CALL 

KITS 

to  Mag  with  conirolter $379,00 

20  Meg  with  controller $499.00 

FLOPPY 

ALLIED  TECHNOLOGY 

Apple  11,11 +  , lie ',2  height .         $109,00 

INDUS 

Atari  GT 5199,00 

C-64  /lae  GT $199,00 

SDt  C-64  Single $219,00 

SDZ  C-64  Dual $469,00 

kanaon 

320K  5y4'  (PC) 3119,00 

TEAC 

320K  5W S1 19.00 


DEPT.  A205 


MONITORS 


XlMCEK 

Video  300  Green S1 19.00 

Video  300A  Amber. S129.00 

Viden  310A  Amber  TTL 5159,00 

Color  600  Hi-Res.  RGB S399  00 

Color  710  Ullra  Hi-Res E439.00 

Color  72S  Dual  Mode $529,00 

MAGNAVOX 

8562  HGB/CompOSile $27900 

613  TTL  Green S99.99 

623  TTL  Amber S99,99 

NEC 

JB1205A S79.99 

JB1270G/1275A (ea.)  S99.99 

jai2aOG  TTL  Green SI29.00 

JB1285A  TTL  Amber S129.00 

JC1460  HGB 5229,00 

JC122S  Composite SI  79  00 

JC1401  Mulli  Sync  RGB S549.00 

PRINCETON 

MAX-12  Amber SI  79  00 

HX-9  9"  RGB S469.00 

HX-9E    Enhanced 3519.00 

HX-12  12"  RGB S469.00 

HX-12E  Enhanced S559.00 

SR-12  Hi-Res 5599,00 

SR-12P  Prolessional , ,5699.00 

mTSkXMM 

116  12"  Green $119.00 

116  la  '  Amber $129.00 

121  TTL  Green $139.00 

122  TTL  Amber S149.00 

620  540x200  RGB SNEW 

630  640x200  RGB SNEW 

e'-O  720x400  RGB SNEW 

8400  Ouadchrome  I S499.00 

8410  Ouadchrome  II..,, S339.00 

8420  Amberchrorae SI  79.00 

B500  Quad  Screen S1449.00 

ZVM  1220  Amber $99,99 

2VM  1230  Green $99.99 

ZVM  1240  IBM  Amber $149,00 

ZVM  135  RGB $469.00 

ZVM  1330   RGB $459.00 

ZVM  1360  RGB  CALL 

ZVM  1380  E  G  Comp CALL 


INTERFACES 


Wulli  I/O  (Apple  II) S149.00 


Graphcard S79.99 

Seriali  Card 599,99 

MicrobuRer  II  + S169.00 

MicrobuHer  32,K 5189,00 

yicrofazer from  S139.00 

Elazer  (Epson) from    579.99 

^Orange  mtcro 

Grappler  CD  (C64) $69.99 

Grappler  Plus  (Me,  ilc) $89.99 

Grappler  C  (llcl $89.99 

Grappler  16K  (lie.  Il-f} S149.00 

DIGITAL  DEVICES 

Ape  Face  (Atari) $4i,,99 

U-Prini  A  (Atari) $54.99 

U-Aie/Bulfer  (Alan) $74.99 

U-Call  Interlace  (Atari) $39.99 

U-Print  C  (CB4} $49.99 

p.16  Print  Buffer $74.99 

U-Print  16  apple  tic $89.99 


K 


igg^ 


WB^P^^ 


PRINTERS 


Canon 

A40,A50,A5S CALL 

LBP-8A1    Laser CALL 

#CITIZEN 

MSP-10  (80  001.) S279.0O 

MSP-15  (132  col.) $389.00 

MSP-20  (80  cot.) $349.00 

MSP-2S  (132  col.) $509.00 

crroH 

Prownter   7500 $169.00 

Prowriler   1550P $349.00 

Starwriler   10-30 $399.00 

3500  Tri  Printer $1499.00 

corona 

Lazer  LP-300 $2799.00 

DIABLO 

620  Daisywheet $299.00 

D25  Daisywheel S549.00 

635  Daisywiiae! $1099.00 

D80IF  Daisywheel CALL 

d*isvwriter 

2000 $699.00 

EPSON 

Homewriier  10,  D(-80 CALL 

Fx-BS,  Fx-zae.  rx-ioo call 

DX-10,  DX-20,  DX-35 CALL 

SQ-2000.  Hi-80.  HS-80.  AP-SO CALL 

LO-aOO.   LQ-tOOO CALL 

mMMCW 

6000  Letter  Quality CALL 

6100  Letter  Quality CALL 

6200  Latlor  Quality CALL 

33O0  Letter  Quality CALL 

5S10  Ool  MatrlK CALL 

LEGEND 

808  Dot  Matrix  100  cps $179.00 

1080  Dot  Matrix  too  cps 5259.00 

1380  Dot  Matrix  130  cps $269.00 

1385  Dot  Matrix  165  cps ...$339.00 

NEC 

3000  Series $779.00 

8000  Series S1099.00 

ELF  360 S399.00 

Pinwriier  560 $999.00 

OgCATA 

182,  183,  192,  193,  2410,  84 CALL 

Okimale  10  [Specify  C64/Atari)$1  BS.OO 
Okimate  20  (IBM) CALL 

Panasonic 

KXlOaO NEW 

KX1091 $259.00 

KX1092 $389.00 

KX1592.. $469.00 

KX15g5 $659.00 

Quad|et $399.00 

Quad  Laser CALL 

^SilYER-REeO 

500  Letter  Quality $219.00 

660  Letter  Quality S419.00 

BOO  Letter  Quality $699.00 

SG-10A  (Atari) CALL 

SG-10C  (064  Interface) CALL 

SB/SD/SG/Sfl  Series CALL 

Powertype  Letter  Quality CALL 

Tfecas  Instruments 

TI850 $529.00 

T1855 $639.00 

TiaeS $799.00 

TOSHIBA 

1340  (80  column) , $389.00 

P341  (132  column) S799.00 

P351  (132  column) $1049,00 


SOFTWARE  FOR  IBM 


ANSA  SOFTWARE 

Paradox $499.00 

ASHTON-TATE 

Framework  II $389,00 

dBase  III  Plus $389.00 

BORLAND 

Lightening $59.99 

Sidekick  (unprolBcfed) $57.99 

Reflex S59,B9 

NewspacK S57.39 

CENTRAL  POINT 

Copy  II   PC-Backup S29.9i'' 

DECISION  RESOURCES 

Ciiartmaster S229.00 

Signmasler $169.00 

Diagram  Master $209.00 

FIFTH  GENERATION 

Fast  back 99.99 

FOX  AND  CELLER 

Quickcade  111 $169.00 

FUNK  SOFTWARE 

Sideways ,  ,,  ,,$44.99 

HARVARD  SOFTWARE  INC. 

Total  Project  Manager $269  00 

INFO  COM 

Cornerstone S269.00 

LIFETREE 

Voikswriler   Hi $15900 

LIVING  VtOEOTEXT 

Think  Tank $109.00 

Ready $64,99 

LOTUS 

Symphony CALL 

1-2-3  Version  2 CALL 

MECA  SOFTWARE 

Managing  Your  Money  2.0 S99,99 

MICROPRO 

Easy $94.99 

WordStar  2000 S239.00 

WordStar   2000+ $289.00 

WordStar  Professional 5169.00 

MICRORIM  SOFTWARE 

R:Base  4D00 $249,00 

R:Base  50OO $389  00 

Cloul  2,0 .$12900 

MICROSOFT 

Flight   Simulator ,   ,    ,534  99 

MulttPlan , $129,00 

Word $249.00 

Mouse $139,00 

MICROSTUF 

Crosstalk  XVI S89  99 

Crosstalk  Mark  IV $149  00 

Remote 589,99 

MULTIMATE 

Multi  Male  Word  Proc $219.00 

Advantage $289,00 

On  Fite  $89.99 

Just  Write $69  99 

NOUNEMON 

Intuit    $69,99 

NORTON 

Nonon  Utiiities  3,1 559.99 

ONE  STEP 

Golf's  Best 537.99 

PFS:  IBM 

Proof $69,99 

Fiie/Graph , (ea).$79,99 

Report , $74,99 

VVriie/Proof  Combo , $79,99 

PROFESSIONAL  SOFTWARE 

Wnte-N-Spell $89.99 

THE  SOFTWARE  CROUP 

Enable $329.00 

SATELLITE  SYSTEMS 

Word  Perlecl  4  1 $219.00 

SORCIM/IUS 
Accounting 

AP/ARfGLflNV/OE (ea)   5299.00 

SuperCalc  III SI  99.00 

EasyWnter  II  System $239,00 

Super  Pfoiect  , $199,00 

SPI  SOFTWARE 

Open  Access , $299,00 

SUBLOOtC 
Jet $37,99 


IBM  PC  SYSTEMS 

Configured  to  your  specifications. 

Call  for  Best  Price! 

IBM-PC,  IBM-XT,  IBM-AT 


MULTIFUNCTION  CARDS 


PC-138  Series,  PC-148  Series,  PC-15B 
Series,  PC-160  Series,  PC-171  Seiisa, 
AT-eoo  Series CALL  | 

$SAIUVO 

MBC  550-2,  MBC  555-2,  MBC  675  Por- 
table. MBC775.  MBC  880  DesktopCALL 

Safari  (7300)..^. CALL 

6300,,, CALL 

corona 

PPC400  Dual  Portable $1289,00 

PPCXT  to  meg  Portable $1939.00 

PC40022  Dual  Desktop., 51389.00 

PC40O-HD2  to  meg S1989.00 

ITT  X-TRA  TFL 

2S6K,  2  Drive  System CALL 

256K,10  meg  Hard  Drive  System  CALL 
XP5,  20  meg CALL 

Sperry-AT as  low  as  $1749.00 

Sperry-IT as  low  as  $2899.00 

Call  tor  Specific  Configuration! 
All  Models CALL 

mvfRo 

KP-2000  Portable CALL 

Kaypro  PC CALL 

/isr 

HamVanlage $349.00 

Rampage-PC $379,00 

Rampage-AT CALL 

Six  Pack  Plus. $229.00 

1/0  Plus  II $139.00 

Advantage- AT $399,00 

Preview  Mono $299.00 

PC  fJet  Cards , 5379,00 

525ini  On-line $669.00 

5251/12  Remote $579.00 

IRMA  3270.....^^^ $879.00 

IRMA  Pnnt ,, $999.00 

IRMA  Smart  Alec $779  00 

=^VEREX- 

Edge  Card $269.00., 

Graphics  Edge S229.00 

Magic  Card  II $159.00 

Magic  Card  I $99.99 

HERCULES 

Graphics $299.00 

Color $159.00 

IDEA   5251 $589.00 

MYLEX 

The  Chairman ..................5433.00 

PARADISF- 

Color/Mono  Card $149.00 

Modular  Grapnics  Card.... 5259.00 

Muiti  Display  Card $199.00 

Five  Pack  C.  S 5129.00 

Bob  Board $369.00 

Captain  -  64 $199.00 

Graptiics  Master .,.,.,. .,.,$469,00 

QUADRAM 

Quadport-AT SI  19.00 

Liberty-AT  (128K) $349.00 

Tfie  Gold  Quadboard $449  00 

The  Silver  Quadboard $239.00 

Expanded  Quadboard $199.00 

Liberty $309.00 

OuadSprint $499.00 

OuadLink $399.00 

QuadColor $199.00 

Ouadboard-AT CALL 

6600  E.G.A.  card $399.00 

INTEL 

PCNC8087  SMHl 

PCNC8087-2  B  MHl CALL 

PCNCB02a7  6  MHz FOR 

1010  PC-Above  Board YOUR 

1110  PS-Above  Board. PC 

2010  AT-AbovB  Board. 


-V- 

■Il 

^^^ 

^^Hml 

^^mmii  i|! 

t. Si_ — 

press  the  function  key  labeled  Outline. 
Within  seconds,  an  outline  of  the  entire 
article  is  before  you.  Move  the  cursor  to 
the  topic  that  interests  you,  press  Enter, 
and  you'll  go  directly  to  that  section. 

Though  it  contains  more  than 
30,000  articles.  The  Electronic  Encyclo- 
pedia is,  by  its  very  nature,  general.  It  is 
not  detailed  enough  to  be  particularly 
helpful  in  serious  research,  though  it 
does  quite  well  at  answering  general 
questions.  Thanks  to  the  compact  disc 
format,  however,  it  is  practical  and  eco- 
nomical to  update  regularly,  another 
advantage  over  its  paper  counterparts. 
Grolier  promises  to  update  the  encyclo- 
pedia each  year  for  $24.95. 

Having  all  the  information  in  20 
volumes  available  on  a  single  disc  is 
exciting,  but  even  more  thrilling  is  what 
it  promises  for  the  future.  Imagine  a 
whole  library  of  compact  disc  data- 
bases— indexes  to  law  libraries,  census 
data,  technical  journals — and  imagine 
what  it  might  mean  to  have  the  key  to 
all  that  information — the  key  to  the 
information  age. 
Philips  CM200  CD-ROM 
The  Electronic  Encyclopedia 
Grolier  Electronic  Publishing,  Inc. 
Sherman  Turnpike 
Danbury,  CT  06816 
$1,495 

The  Electronic  Encyclopedia 
(without  drive)  $199 


The  Body  In  Focus 


Larry  Krengel 

Requirements:  Commodore  64;  Apple  11- 
series  computer  with  at  least  64K  RAM; 
IBM  PC  with  color /graphics  adapter;  or 
an  IBM  PCjr.  Disk  only. 


I'm  always  excited  when  I  see  computer 
software  that  displays  impressive 
graphics.  And  The  Body  in  Focus  is  excit- 
ing software,  What's  more,  this  human 
anatomy  program  is  educational,  accu- 
rate, and  engaging. 

I've  been  teaching  biology  for  15 
years.  When  I  first  examined  The  Body 
in  Focus,  I  found  it  to  be  technically 
correct.  But  why  did  I  continue  looking 
at  the  program  long  after  I  had  assured 
myself  it  was  biologically  valid?  Be- 
cause I  didn't  want  to  miss  any  of  the 
great  graphic  presentations. 

For  example,  the  designers  must 
have  burned  the  midnight  oil  to  make 
the  simulated  body  sneeze  and  even 
raise  goose  bumps.  My  kids  thought 
they  were  seeing  things  when  the  skel- 
eton swung  its  head  around  to  demon- 
strate a  pivot  joint.  (When  you  can't 


With  The  Body  in  Focus,  anyotie  can 
have  X-ray  vision.  (Commodore  64 
version.) 

believe  what  you're  seeing,  one  key- 
press repeats  the  action.) 

The  Body  in  Focus  comes  on  two 
disks.  The  first  contains  tutorials,  and 
the  second  presents  questions  based  on 
the  tutorials.  Eight  vital  body  systems 
are  covered — including  the  circulatory, 
respiratory,  endocrine,  skeletal,  ner- 
vous, digestive,  muscular,  and  integu- 
mentary (skin,  that  is).  A  tour  of  each 
system  takes  10  to  15  minutes. 

To  illustrate  each  body  system,  the 
disk  contains  three  "body  closeups":  a 
closeup  view  of  each  system  within  the 
head,  torso,  and  arm.  The  closeups  let 
you  strip  away  the  body  layer  by  layer, 
going  deeper  and  deeper.  It's  like  a 
graphic  dissection.  If  you  find  one  of 
the  screens  particularly  interesting, 
there's  a  "tell  me  more"  key  which  calls 
up  a  more  complete  discussion  of  what 
you  see. 

Body  Trivia 

The  second  disk  contains  a  library  of 
more  than  200  questions  based  on  the 
tutorials.  If  you  think  you  already  know 
a  lot  about  the  human  body,  try  the 
"body  l.Q.  test"  before  using  the  tutori- 
als. Do  you  know  how  many  taste  buds 
there  are  on  a  human  tongue?  Or  how 
long  it  takes  your  body  to  pump  3,000 
gallons  of  blood?  Or  why  you  get  goose 
bumps? 

The  Body  in  Focus  is  very  simple  to 
use.  Which  key  do  you  press  to  view 
the  digestive  system?  Or  the  skeletal 
system?  You  don't  have  to  memorize 
these  details — a  soft  plastic  keyboard 
overlay  lists  all  the  key  functions. 

Another  strong  point  of  the  pro- 
gram is  its  use  of  sound,  With  some 
software,  you  can  often  tell  that  sound 
was  added  as  an  afterthought.  But  with 
The  Body  in  Focus,  the  sound  is  ver}' 
functional.  You  quickly  learn  the  differ- 
ent sounds  for  "your  turn"  and  "that 
key  doesn't  do  anything."  Sounds  are 
used  intelligently  for  getting  your  atten- 
tion at  the  right  time  and  for  signifying 
right  and  wrong  responses. 

As  a  parent,  I  would  recommend 


The  Body  in  Focus  for  a  youngster  who  is 
taking  biology.  As  a  teacher,  I  probably 
wouldn't  use  The  Body  in  Focus  as  part 
of  the  curriculum  because  it  is  not  se- 
quential (some  students  may  choose 
not  to  press  "tell  me  more").  However, 
this  program  is  exciting  enough  that  I 
think  students  would  invest  their  own 
time  to  travel  through  The  Body  in  Fo- 
cus. It  would  be  great  for  enrichment. 

The  Body  in  Focus 
CBS  Interactive  learning 
One  Fawcett  Place 
Greenwich.  CT  06836 
$39.95 


One-On-One 
For  Amiga 

Charles  Brannon,  Program  Editor 

Requirements:  Amiga  with  256K  RAM. 
Joystick  and  512K  RAM  recommended. 

As  promised,  Electronic  Arts  has  suc- 
cessfully translated  for  the  Amiga  sev- 
eral of  its  popular  games  originally 
written  for  the  Commodore  64,  Atari, 
and  Apple.  These  programs  are  show- 
case pieces  of  game  design.  On  comput- 
ers like  the  Amiga,  they  can  be  even 
better,  using  the  power  of  the  machine 
to  enhance  the  realism  with  additional 
color,  detail,  and  smoother  motion.  The 
Amiga's  stereo  sound  system  can  also 
be  exploited  for  more  realistic  music 
and  unusual  sound  effects. 

Not  all  games  can  easily  incorpo- 
rate these  new  features  without  being 
redesigned,  however.  Because  One-on- 
One  is  an  adaptation,  it  is'very  similar  to 
the  original  version  running  on,  say,  a 
Commodore  64.  Although  the  Amiga 
version  has  a  more  colorful  screen  with 
true-to-life  color  schemes,  basically  the 
original  game's  graphics  have  been  re- 
touched. For  example,  the  basketball 
court  is  convincingly  colored  to  look 
like  a  polished  wood  floor.  This  is  pos- 
sible due  to  the  Amiga's  ability  to  dis- 
play up  to  32  colors  simultaneously  on 
its  low-resolution  graphics  screen.  {The 
term  low  resolution  is  relative;  the  same 
resolution  of  320  X  200  pixels  is  called 
high  resolution  on  the  Commodore  64.) 
Each  color  is  chosen  from  a  wide  range 
of  possible  hues  (4,096  in  all),  so  it's 
easier  to  approximate  real-life  colors. 

On  the  other  hand,  the  sound  ef- 
fects in  One-on-One  are  considerably 
enhanced,  since  the  Amiga  can  play 
back  digitally  recorded  sounds.  You  can 
hear  the  actual  background  noises  of  a 
basketball  game,  with  the  crowd  mur- 
muring,  cheering,   booing,   catcalling, 
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Famous  Smith  Corona  National  Brand 

1 0"  PRINTER  SALE 

BGl€>v\f  y)fhalescilG  Cost  Prices!!! 

•  ONE  YEAR  IMMEDIATE  REPLACEMENT  WARRANTY 

•  Speed:  120  or  160  characters  per  second      •  Friction  Feed/Tractor  Feed  —  Standard 

•  80  character  print  line  at  10  CPi  •  1  Line  Buffer,  2K  Buffer  on  160  CPS  Plus  LQM 

•  Six  pitches        •  Graphics  capability        •  Centronics  compatible  parallel  interface 

•  Features  Bidirectional  Print,  Shortline  Seek,  Vertical  And  Horizontal  Tabs 

Check  These 
Features  &  Prices 

120  CPS  10*'  Printer 


List 
$429.00 

SAL 


f159 


160  CPS  +  Letter  Quality 
Mode  10"  Printer 


emphasized 


This  is  a  sample  of  our 
near-let ter-quai ity  print, 

There  is  standard  data 
processing  qualitq  print 


List 
$499.00 


italic   print 


SALE 


f199 


OBM  —  Commodore ) 

Slze/W»lght 

Height  5.04"  Width  16.7" 

Depth  13.4"  Weight  18.7  lbs. 

Intarnol  Char,  Coding 

ASCII  Plus  ISO 

Print  Buffer  Size 

120  CPS:  132  Bytes  (1  line) 

120/160  CPS  Plus  LQM:  2K 

No.  of  Chnr.  tn  Char.  Sot 

96  ASCII  Plus  International 

Oraphlci  Capability 

Standard  60.  72,  120  DPI 

Horizontal  72  DPI  Vertical 

Pitch 

10.  12,  16.7,  5,  6.  8.3.  Proportionol  Spacing 

Printing  Method 

Impact  Dot  Motrix 


SPECIFICATIONS 


(Apple  —  Atari  —  Etc. ) 


Char.  AAatrtx  Size 

9H  X  9V  (Standard)  to  I  OH  x  9V 

(Emphasized  &  Elongate) 

Printing  Features 

Bi-directional.  Short  line  seeking.  Vc 

Tabs.  Horizontal  Tabs 

Form*  Type 

Fanfold,  Cut  Sheet,  Roll  (optional) 

Max  Paper  Width 

H" 

Feeding  Method 

Friction  Feed  Std.;  Tractor  Feed  Std. 

Ribbon 

Cassette  —  Fabric  Inked  ribbon 

Ribbon  Life 

A  million  characters 


Interfaces 


Interfacei 

Porallel  8  bit  Centronics  compotible 
120/160  CPS  Plus  NLQ:  RS232  Serial  inc. 
Character  Mode 
rtical  10x8  Emphasized;  9x8  Standard;  10x8 

Elongated;  9x8  Super/Sub  Script  (1  pass) 
Character  Set 
96  ASCII 

11x7  Internationol  Chor. 
Line  Spacing 
6/8/12/72/144  LPI 
Character  Spacing 

1 0  cpi  normol;  5  cpi  elongated  normal;  1 2  cpi 
compressed;  6  cpi  elongated  compressed: 
16.7  cpi  condensed;  8.3  cpi  elongated 
condensed:  5.12,5  cpi  elongoled  proportional 

Cartridge  Ribbon  —  List  $19.95.  Sale  112.45. 


IBM  $89.00 


Apple  $59.00 


Atari  $59.00 


Commodore  $39.95 


Add  Si  4.50  for  shipping,  handling  and  insurance.  Illinois  residents 
pleose  add  6'.,  •■.  tan.  Add  S29.00  for  CANADA.  PUERTO  RICO.  HAWAII. 
ALASKA.  APO-FPD  orders.  Canadian  orders  must  be  in  U.S.  dollors.  WE 
DO  NOT  EXPORT  TO  OTHER  COUNTRIES,  EXCEPT  CANADA.  Enclose 
Cashiers  Checl^.  Money  Order  or  Personol  Check.  Allow  14  days 
delivery.  2  to  7  doys  for  phone  orders,  i  day  express  mail!  Prices  £ 
Availability  subiect  to  cfiange  without  notice. 
VISA  —  MASTERCARD  —  C.O.D.  No  C.O.D.  to  Conoda  or  APO-FPD 


We  Love  Our  Customers 

22292  N.  Pepper  Rd.,  Barrington,  Illinois  60010 

312/382-5244  to  order 


COMMODORE  64 
COMPUTER 

(Order  Now) 

•  CT28  Dliks  79«  ea.* 

•  Paperback  Writer  64  $39.95 

•  10"  Comitar  10X  Printer  $148.00 
•U"  Color  Monitor  $149.95 

CALL  BEFORE  YOU  ORDER 


COMMODORE  U  COMPUTER  SI 39.4$ 

You  poy  only  S139_9S  when  you  order  the  powerful 
8«  COMMODORE  64  COMPUTER!  lESS  the  value  of 
the  SPECIAL  SOFTWARE  DISCOUNT  COUPON  we  pock 
with  your  corrkpuler  thai  allows  you  lo  SAVE  OVER 
S250  oH  software  sole  prices!  ■  With  ofily  SIOO  of 
savings  applied,  your  net  computer  cost  is  $39.951 ! 

■  cue  DOUBLE  SIDED  DISKS  7f<  EA. 

Get  these  SVi  Double  Sided  Floppy  Disks  speciolly 
designed  iot  I  he  Commodore  128  Computer  {1571  Disk 
Drivel.  100*'.  Certified.  Uf»tlme  Warranty. 
Automatic  Lint  Cleaning  Liner  included.  1  Bok  of  10  • 
S9.90  (W  eo.),  5  Boxes  of  10  ■  S<H.50  (89'  ea.),  JO 
Bo«e5oflO-$79.00(79'ea.l. 

14"  COLOR  MONITOR  t144.95 

You  poy  only  $U9.95  when  you  order  this  U"  COLOR 
MONITOR.  LESS  the  volue  ot  the  SPECIAL  SOFTWARE 
DISCOUNT  COUPON  we  pock  with  your  monitor  that 
allows  you  to  sove  over  $250  off  software  sole 
prices! !  With  only  $100  of  savings  applied,  your  net 
color  monitor  cost  is  only  S49.95,  (16  Colors). 

Premium  Quality  120-140  CPS 
Comitar  10X  Printer  $148.00 

Tfie  COMSTAR  lOX  gives  you  a  10"  corrioge.  130140 
CPS,  9x9  dot  matrix  with  double  strike  capability  for 
18  X  18  dot  matrix  (near  letter  quality),  high  resolution 
bit  image  (120  x  144  dot  matrix),  underlining,  bock 
spacing,  left  and  right  morgin  setfing.  true  lower 
decertders  with  super  ond  subscripts,  prints  standard, 
itolic.  block  graphics  ond  speciof  chorocters.  It  gives 
you  prini  quality  and  feotures  found  on  printers 
costing  Iwice  as  muchM  (Centronics  Porollel 
Interface)  List  $399.00  Sol*  %\nM. 

4  SLOT  EXPANDER  &  90  COLUMN  BOARD  S4«.tS 

Now  you  progrom  80  COLUMNS  on  the  screen  at  one 
time!  Converts  your  Commodore  64  to  30  COLUMNS 
when  you  plug  in  the  60  COLUMN  EXPANSION 
BOAI!D!  I  PLUS  4  slot  expander!  Umltad OuantHIwi 
Sol«t4t.f9.  Coupon S39.95. 

to  COLUMNS  IN  COLOR 
PAPERBACK  WRITER  t4  WORD  PROCESSOR  t».45 

This  PAPERBACK  WRITER  64  WORD  PROCESSOR  is  the 
finest  available  for  the  COMMODORE  64  computer! 
The  ULTIMATE  fOR  PROFESSIONAL  Word  Processing. 
DISPLAYS  40  or  80  COLUMNS  IN  COLOR  or  block  and 
white!  Simple  to  operate,  powerful  text  editing, 
complete  cursor  and  insert/delele  key  controls  line 
ond  paragraph  insertion,  automolic  deletion, 
centering,  margin  settings  and  output  to  all  printers! 
List  S99.00.  SAir  »».«S.  Coupon  $29.95. 


COMMODORE  64 
SYSTEM  SALE 


Commodore  64 


Plus  S30.00  SfiH 


Com.  1541 
Disk  Drive 

14"  Color 
Monitor 


^457 


PLUS  FREE  $49.95  Oil  Barons 
Adventure  Program 


SPECIAL  SOFTWARE  COUPON 


Wb  pack  a  SPECIAL  SOFTWARE  DISCOUNT  ' 
COUPON     with    every    COMMODORE     64 
COMPUTER,      DISK     DRIVE,     PRINTER,     or 
MONITOR  we  sell!  Thl*  coupon  ollowf  you 
to  SAVE  OVER  t2S0  OFF  SALE  PRICESi! 


(ExaiT 

pies) 

^^^ 

^^ 

PROFCSSIONAL  SOFTWARE 

COMMODORE  64 

Nam* 

lilt 

Sal* 

Coupon 

Poperback  Wri!»r  64 

$99.00 

$39.95 

$29.95 

Pap«rbock  Da!oba»  64 

(69-00 

$34.95 

$24.95 

Pop«rb>ach  Diclianary 

S2i.95 

$14.95 

$10.00 

The  Prinr  Shop 

$14.95 

$27.95 

$26.95 

Holloy'j  Pro|»cl 

J39.9S 

$25,95 

(24.95 

Proctkok  (ipraod  ih«#0 

J59.95 

$19.95 

$14.95 

Voice  Corfimond  MQ<dul9 

$79.95 

$39.95 

$34.95 

Nine  Princ«  in  Amber 

$33.9! 

$54.95 

$21.95 

Super  Bawl  Sunday 

MO.OO 

$19.95 

$17,95 

F)ip5FileDi»k  Filer 

$24.95 

$14.95 

$12.95 

Pro  Joystick 

S19.95 

$12.95 

$10.00 

Computer  Core  Kit 

S»i,95 

$29.95 

$24.95 

Dull  Cover 

s  a.9s 

S  6.95 

$  4.60 

Fil«  Wriler  (by 

S39  95 

139  95 

$24  95 

C6i  Troublestioot  t 

Rspair  Guide 

tW.9S 

115,95 

$13,95 

Financial  Planner  — 

Sylvia  Porter 

$S9.9S 

$3e.95 

$35.95 

(See  over  100  coupon  items  in  our  catalog) 

Write  or  call  for 

I  Sampio  SPECIAL  SOFTWARE  COUPON!  I 


ATTENTION 

Computer  Clubs 

We  Offer  Big  Volume  Discounts 
CALL  TODAY! 


PROTECTO  WARRANTY 

All  Pfotectos  products  carry  a  mtnimym  ^0  day  worronty. 
li  anything  faiis  wilhin  90  doyf  from  the  dole  of  purchase, 
simply  send  your  product  lo  us  vio  United  Porcel  Service 
prepaid.  We  will  IMMEDIATELY  send  you  0  replacement  at 
no  charge  via  United  Parcel  Service  prepaid.  This  worronty 
proves  once  again  that  W9  LO¥9  Our  Cvttomers. 


CI  28  COMMODORE 
^  COMPUTER 

^^P^       (Order  Novtf) 


(SEE  BELOWI 

With  S59.9S  Timeworlcs  Wordwriter 
Wordproeexor  savings  applied 

•  340K  1S71  Disk  Drive  $259.00 

•  Voice  Synthesiier  $39.95 

•  T2"  Monrtor  $79.95 

PRICES  MAYBE  LOWER 


'  C12«  COMMODORE  COMPUTER  S289.00 

You  pay  only  $289.00  lor  Ihe  C128  computer  ond  we 
include    the    CI 28    Wordwriler    Wordprocessor    by 
Timeworks  (Sale  S59.95).  Thus,  your  net  cost  for  the 
CI  28  computer  is  only  $229,05. 
List  $349.00,  SALE  (U4.00. 

340K  1571  COMMODORE  DISK  DRIVE  S2S9.00 

Double  Sided.  Single  Disk  Drive  for  C-128  allows  you 
>o  use  C-I2&  mode  plus  CPM  mode.  17  times  tasier 
than  1541 .  plus  runs  oil  1 541  lormats. 
List  $349,00.  Sqla*U«.O0. 

SUPER  AUTO  DIAL  MODEM  $29.45 

Eosy  lo  use.  Just  plug  into  your  Comrr^odore  64 
con^pgter  ond  you're  ready  to  Ironsmil  end  receive 
messages.  Easier  to  use  than  dialing  your  telephone 
just  push  one  key  on  your  computer!  Includes 
exclusive  eosy  to  use  progrom  lor  up  (tnd  down 
loading  lo  printer  ond  disk  drives.  Bett  in  U.S.4. 
ListS99.00.  SALE  $39.9$.  Coupon S24.95, 

VOICE  SYNTHESIZER  S39.95 

For  Comfnodore-64  computers,  iusi  plug  it  in  and  you 
con  program  words  and  sentences,  adjust  volume  and 
pitch,  make  talking  odventure  gomes,  sound  action 
games  and  customijed  talkies!!  PLUS  ($19,95  volue] 
TEXT  TO  SPEECH  progrom  included  FREE,  just  type  a 
word  ond  heor  your  computer  talk  —  ADD  SOUND  TO 
■ZORK",  SCOTT  ADAMS  AND  OTHER  ADVENTURE 
GAMES!!  (Disk  or  tope,)  List  SB9. 00-  SALEt3«.f5 

12"  MAGNAVOX  (NAP)  BO  COLUMN 
MONITOR  WITH  SOUND  S79.95 

Super  High  Resolution  green  screen  monitor,  80 
columns  x  24  lines,  eosy  lo  read,  plus  speaker  lor 
oudio  sound  included.  Fontostic  value  List  $129-00 
Sale  HI.9J.  {C)38  cable  $19.95.  C64,  Atori  coble 
S9.95I 

PRINTER/TYPEWRITER  COMBINATION  $»f.45 

"JUKI"  Superb  letter  qualily,  daisy  whe^^l 
printer/typewriter  combination.  Two  machines  in  one 
—  just  a  flick  of  the  switch.  12"  extra  lorge  corrioge, 
typewriter  keyboord,  automatic  margin  controi  ond 
refoccte  key,  drop  in  cassette  ribbon?  (90  day 
worronty)  Centronics  parallel  or  R$232  seriol  port  buifl 
in  (Specify).  List  $349,00.  SALE  »l»,fi,        (lid.  Oty.) 

14"  RGB  &  COMPOSITE  COLOR  MONITOR  SlSt.tS 

Must  be  used  fo  gel  80  columns  in  color  with  BO 
column  computers  (C128  ■  IBM  -  Apple), (RGB  Coble 
$19,95)  Add  $14.50  shipping. 
List  $399.00.  SALE  S3S9.95. 


•  lOWIST  P8ICES  •  15  DAY  FREE  TRIAL 

•  BiST  SERVICE  IN  U.S.A.  •  ONE  DAY  EXPRESS  MAIL 


PHONE  ORDERS 

8  a.m.  -  8  p.m.  CS.T.  WeekcJoys 
9  a,m,  -  12  noor*  CS.T,  Scaturdays 


•  90  DAY  FREE  REPLACEMENT  WARRANTY 
•  OVER  500  PROGRAMS  •  FREE  CATALOGS 


Add  $10,00  for  shipping,  hondling  and  insurance,  Illinois  residents 
please  odd  6V.%  lox.  Add  $20,00  for  CANADA,  PUERTO  RICO, 
HAWAII,  ALASKA,  APO-FPO  orders,  Canadian  orders  must  be  in  U,S. 
dollars,  WE  DO  r<OT  EXPORT  TO  OTHER  COUNTRIES,  EXCEPT 
CANADA,  Enclose  Cashier  Check,  Money  Order  or  Personol  Check, 
Allow  1 4  days  far  delivery,  2  to  7  doys  for  phone  orders,  1  day  express 
moil !  Prices  &  Availability  subject  to  change  without  notice, 
VISA  —  MASTER  CARD  —  C,0,D.         No.  C,0,D.  to  Conodo,  APO-FPO 


We  Love  Our  Customers 

Box  550,  Borrington,  Illinois  60010 

312/382-5244  to  order 


Commodore  Software  Sale 


ORDER  TOD  A  Y! 


GAMES 


Accolade 

□  5950  HARDBALL  (D) S29.95  $16.95 

D  5952  LAW  OF  THE  WEST  (D) 29.95      I  B.95 

□  5954  FIGHT  NIGHT  (D) 29.95      I  8.95 

a  5956  PSI  5  TRADING  CO.  (D) 29.95     18.95 

L;  5958  THE  DAM  BUSTERS  (D) 29.95     18.95 

Activlston 

n  0757  RIVER  RAID  (D) $39.95  $18.95 

a0761  PITFALL  II  — LOST  CAVERNS  (D).  39. 95  18.95 

D  0900  SPACE  SHUTTLE  (D) 37.95  18.95 

□  0932  ON  FIELD  FOOTBALL  (D) 39.95  1 8.95 

D  0936  ON  COURT  TENNIS  (D) 39.95  1 8.95 

C  0940  GHOSTBUSTERS  (D)  39.95  22.95 

D  3580  GREAT  AMERICAN  RD.  H  ACE  (D)  .29.95  20.95 

D  3582  MASTER  OF  THE  LAMPS  (D} 29.95  20.95 

D  3584  COUNTDOWN/SHUTDOWN  (D)..  29.95  20.95 

a  3588  MIND5HADOW  (D) 29.95  20.95 

D  3590  STAR  LEAGUE  BASEBALL  {D) 39.95  20.95 

□  3592  ALCAZAR  (D) 29.95  20.95 

D  5196  LITTLE  PEOPLE  PROJECT  (Dl 34.95  24.95 

□  5198  FAST  TRACKS  (D) ,.34.95  20.95 

Broderbund 

n  2900  MASK  OF  THE  SUN  (D) S39.95  J23.95 

D  2901  OPERATION  WHIRLWIND  (D) 39.95  22.95 

n  2903  LODE  RUNNER  (D) 34.95  19.95 

D  2904  THE  CASTLES  OF  OR.  CREEP  (D) . . .  29.95  18.95 

n  2906  WHISTLERS  BROTHER  (D) 29.95  18.95 

D  3039  STEALTH  (D) 29.95  22.95 

D  304  S  8  AID  ON  BUNGELING  BA  Y  ( D)  .,  29.95  1 8. 50 

D  2905  KARATEKA  (D) 29.95  23,95 

D  3038  CHAMPION  LODE  RUNNER  (D)   ..34.95  26.95 

n  5156  SANK  STREET  WRITER  (D) 49.95  32,95 

G  5330  BANK  STREET  SPELLER  (Dl 49,95  32,95 

a  5332  BANK  STREET  FILER  (D) 49.95  32,95 

D  5334  BANK  STREET  MAILER  {D| 49.95  33,95 

Datasoft 

D  3025  BRUCE  LEE  (D)  S34.95 

D  3026PAC-MAN  (D) 34.95 

□  3027  MIGHTY  CONAN  (D) 34.95 

a  3026  MR  DO!  (Dl 34.95 

U  3029  DIG  DUG  (D)  34.95 

D  3032  POLE  POSITION  (D) 34.95 

□  5216  ALTERNATE  REALITY 39.95 

D  5218  THE  GOONIES  (D) 29.95 

D  5220  ZORRO  (D) 29.95 

Electronic  Arts 

n  3630  DR.  J  S  LARRY  BIRD  (D) S29.95 

D  3832  FINANCIAL  COOKBOOK  (Dl  . . . .  39.95 
D  3834  MAIL  ORDER  MONSTERS  (D| 34.95 

□  3840  THE  SEVEN  CITIES  OF  GOLD  (D). .  29.95 
D  3842  SKY  FOX  (0) , 29.95 

□  5176  CARRIERS  AT  WAR  (D) 42.95 

C  5176  REACH  FOR  THE  STARS  II  (D) 37.95 

□  5180  HEART  OF  AFRICA  (D) 29.95 

D  5182  MOVIE  MAKER  (D) 29,95 

D  5184  EUROPE  ABLAZE  (D)  42.95 

□  5166M.U.L.E.  (D) 19.95 

D  5186  MURDER  ON  2INDERNEUF  (D)  . .  .19.95 
D  5190  MUSIC  CONSTRUCTION  SET  (D) . .  1 9.95 
D  5192  PINBALl  CONSTRUCTION  SET  (D)  19.95 
D  5194  RACING  CONSTRUCTION  SET  (D)  29.95 

Epyx 

D  0337 
D0338 
D0339 
Q0340 
D0360 

0  0364 
D0365 
r!0382 
3  0750 

1  3044 
3  2066 
3  2070 
:  2074 
1  30B5 
]  2305 
]  3004 
:  3005 
J  3006 


;i8.95 

18.00 
18.00 
18.95 
18.95 
18.95 
25.95 
18.95 
18.95 


S23,95 
27.95 
23.95 
23.95 
23.95 
32.95 
28.95 
23.95 
23.95 
34.95 
16.95 
16.95 
16,95 
16.95 
23.95 


WORLDS  GREAT  FOOTBALL  (D)  t39.95  $23.95 

WINTER  GAMES  (D) 39.95  20.95 

THE  EIDOLON  (Dl   39.95  20.95 

KORONIS  RIFT  (dJ  39.95  20.95 

JET  COMBAT  SIMULATION  (D)  . . .  39,95  20.95 

SUMMER  OLYMPIC  GAMES  (D)  ..39.95  18,95 

WORLDS  GREAT  BASEBALL  (D) , .  34.95  20.95 

SUMMER  OLYMPIC  GAMES  11(D)  .39.95  20.95 

PIT5TOP  II  ID) 39.95  23.95 

IMPOSSIBLE  MISSION  (D) 34.95  16.95 

ROBOTS  OF  DAWN  (0) 39.95  1  5.95 

BARBIE  (D)  39.95  1  B,95 

G,l,  JOE  (D) 39.95  I  B.95 

BREAKDANCE  (D)  39.95  16.95 

SCRABBLE  (D) 39.95  24.95 

CHIPWITS  (D) 34.95  1 5.95 

BALLBLAZER  (D) 29.95  24.95 

RESCUE  ON  FRACTALUS!  (D) . . . .  29.95  20.95 


Name    _ 
Address 
City 


State 


Zip 


Visa/Mastercard   No. 
Exp.  Date 


Phone  (_ 


{T)Tape,  (C)  Cartridge,  (D)  Disk. 


Stra 

□  2995 

□  2996 
a  2997 

□  2998 

□  3008 
G  3009 
3  3010 

□  3011 
~1  3012 
n  3013 
71  3014 

□  3015 
a  3016 

a  3017 

□  3018 

::302o 

Z  3021 
~  3030 
~3031 


tegic  Simulations,  inc. 

RDF  1985  (D) $34.95  $20.95 

COMBAT  LEADER  (D) 39.95  23.95 

GEOPOLITIQUE  (O) 39.95  24.95 

BALTIC  1965  (D) 34.95  20.95 

RINGSIDE  SEAT  (0) 39.95  23.95 

THE  COSMIC  BALANCE  (Dl 39.95  23.95 

IMPERIUM  GALACTUM  (D) 39.95  23.95 

CARTELS  AND  CUTTHROATS  (0)  .39.95  23,95 

RAILS  WEST  (D) 39,95  25,95 

TIGERS  IN  THE  SNOW  (D) 39.95  23.95 

PROFESSIONAL  TOUR  GOLF  (D)  . .  39.95  23.95 

50  MISSION  CRUSH  (D) 39.95  33.95 

PRESIDENT  ELECT  (D) 39.95  23.95 

BROADSIDES  (D)  39.95  24.95 

COMPUTER  QUARTERBACK  (D). .  39.95  24.95 

COMPUTER  AMBUSH  (D) 59.95  37.95 

COMPUTER  BASEBALL  (D) 39.95  23.95 

KNIGHTS  IN  THE  DESERT  (0) 39.95  23.95 

FIELD  OF  FIRE  (D) 39.95  23.95 


Suncom 

L:  3876  PARTY  QUIZ  (D> $49.95  $14.95 

D  3880  GENERAL  EDITION  (0) 39.95  14.95 

r:  3662  GENERAL  EDITION  III 39.95  14.95 

Z  3884  SPORTS  EDITION  (D) 39.95  14.95 

C  3886  EDUCATION  EDITION  (D) 39.95  14.95 

:Z  3888  BIBLE  EDITION  (D)  39.95  14.95 


BUSINESS 

Codewrlter 

C  0129  FIIEWRITER  (0) $39.95  $29.95 

C  0706  REPORTWRITER  (D)  39.95  29.95 

G  0707  ADVENTUREWRITER  (D) 49.95  39.95 

D  070B  ELF  (D) 39.95  29.95 

n  0709  DIALOG  (D) 49.95  39.95 

G  0784  MENUWRITER  (D)  39.95  29.95 

n  2550  SPEEDWRITER  (D)  49.95  39.95 

□  2551  HOME  INTEGRATOR  (D) 29.95  19.95 

Softsync 

G  5930  ACCOUNTANT,  INC.  (D) $99.95  $64.95 

C  5932  PERSONAL  ACCOUNTANT  {DJ  . . .  34.95  26.95 

G  5934  MODEL  DIET  (D) 29.95  23.95 

G  5936  TRIO  (D) 49.95  45.95 

G  5938  KID  PRO  QUO  (D) 29.95  23.95 

G  5940  DESK  MANAGER  (DJ 39.95  28.95 

Timevworks 

G  0176  INVENTORY  MANAGE  (D) $69.95  $38.95 

C  0180  ACCOUNTS  RECEIVABLE/ 

INVOICING    (Dl   69.00  38.95 

D  0162  ACCOUNTS  PAYABLE/ 

CHECKWRITING  (D) 69.00  38.95 

G  01 84  PAYROLL  MANAGEMENT  (D) .,.,  69.00  38.95 

□  0188  GENERAL  LEDGER  (D) 69.00  38.95 

n  0207  ELECTRONIC  CHECKBOOK  (D8  T)  29.95  19.95 

n  0331  MONEY  MANAGER  IDSTl 29.95  19.95 

n  0335  DATA  MANAGER  (DST)   29.95  19.95 

n  0928  EVELYN  WOOD  SPEED  READ  (D)  .  69.96  32.95 

G  3743  SYLVIA  PORTER  (D) 59.95  38.95 

CI  28  Softvifore  From  Timeworlcs 

G  5022  WORD  WRITER/ 

SPELL  CHECKER  (D) $69.96  $59.95 

G  5024  DATA  MANAGER  II  ID) 69.96  49.95 

G  5026  SWIFTCALC  WITH  SIDEWAYS  (D) .  69.96  49.95 


Phone  Orders 


8  to  8  C.S.T.  -  M-F 


312-382-5244 


EDUCATION 

American  Educational  Computer 

n  2482  ElEM.  SCIENCE  FACTS  (0) $29.95  $14.95 

G  2493  VOCABULARY  WORD  BUILD  (D)  .  .  29.95  14.95 

n  2493  GRAMMAR  WORD  SKILLS  (D)....  29.95  14.95 

U  2494  WORLD  GEOGRAPHY  FACTS  (D) .  29.95  14,95 

□  2495  SPANISH  VOCAB.  SKILLS  (D)  ....  29.95  14,95 

G  2496  FRENCH  VOCAB.  SKILLS  (D) 29,95  14,95 

G  2497  WORLD  HISTORY  (D) 29.95  14.95 

G  2498  U.S.  HISTORY  FACTS  (D) ....... ,  29,95  14.95 

D  2499  BIOLOGY  FACTS  (D)  29.95  14.95 

n  2519  U.S.  GEOGRAPHY  FAaS(D), , .  ,29,95  14.95 

G  2520  U.S.  GOVERNMENT  FACTS  (D). .  .29,95  14,95 

D  2521  AEC  SPELLING  (D)  39,95  24.95 

□  3745  PHONICS  (D) ,.39.95  24.95 

C  3747  LEARN  TO  READ  (D) 39,95  24.95 

G  3749  READING  COMPRENSION  (D)  ...  39.95  24.95 

Deslgn^are 

C  0824  GRAMMAR  EXAMINER  (D) $39.95  $24,95 

C  0826  SPELLAKAZAM  (D) 34.95  19.95 

D  0832  STATES  &  TRAITS  (D) 44,95  27,95 

C  0836  SPELLICOPTER  (Dl 39,95  24,95 

D  0840  CREATURE  CREATOR  (D) 34,95  19,95 

D  0844  TRAP-A-ZOID  (D[  39.95  25.95 

D  2518  THE  BODY  TRANSPARENT  (D) . . . .  44.95  27.95 
D  251 7  EUROPEAN  NATIONS  & 

LOCATIONS  (D)  44.95  27.95 

D  2062  MATH  MAZE  (D) 39.95  26.95 

D  5100  ALGEBRA  1(D) 39,95  28,95 

D  5102  REMEMBER  (D) 69,96  49,95 

D  5104  WEBSTER'S  NUMBERS  (D) 39,95  28,95 

n  5105  SPELLING  &  READ  PRIMER  (D) . . . .  39,95  24.95 

D  5106  ALGEBRA  3  (Dl 39.95  28.95 

a  5107  ALGEBRAS  (DJ 39.95  2B.95 

Mindscape 

D  5108  KEYBOARD  CADET  (D) 39.95  25.95 

D  51 10  BANK  STREET  MUSIC  WRITER  (O).  39.95  25.95 

0  51 12  CROSSWORD  MAGIC  (D)   49.95  29,95 

0  51 1 4  THE  PERFECT  SCORE  (D) 69,96  45,95 

O  51 16  COIORME/RAINBOW  BRITE  (D) , ,  34,95  18,95 

O  51 18  THE  HALLEY  PROJECT  (D) 39.95  25.95 

O  51 20  INDIANA  JONES  IN  THE 

LOST  KINGDOM  (D) 29.95  18.95 

G  51 22  BANK  STREET  STORYBOOK  (D)  .  .  39.95  25.95 

G  5910  THE  DOLPHINS  RUNE  (D) 29.95  18.95 

D  5912  THE  LUSCHER  PROFILE  (D) 39.95  25.95 

G  5914  QUAKE  MINUS  ONE  (D)  29.95  18.95 

D  5916  THE  LORDS  OF  MIDNIGHT  (D) . . . .  29.95  18.95 

D  5918  SHADOWFIRE  (D[ 29.95  18.95 

Weekly  Reader 

a  2511  STICKYBEAR  BOP  (D)  $34.95  $19.95 

D  251 2  STICKYBEAR  NUMBERS  (D) 34.95  19.95 

O  2513  STICKYBEAR  BASKETBOUNCE  (D)  34.95  19.95 

G  2514  STICKYBEAR  OPPOSITES  (D) 34.95  19.95 

G  2515  STICKYBEAR  ABC  (D) 34.95  19.95 

G  2516  STICKYBEAR  SHAPES  (0) 34.95  19.95 

D  2600  PIC  BUILDER  (D) 29.95  19.95 

O  5126  STICKYBEAR  SPELIGRABBER  (Dl  .  29.95  19.95 

O  5128  STICKYBEAR  TOWN  BUILDER  (D)  .  29.95  19.95 

O  5130  STICKYBEAR  MATH  (D) 29.95  19.95 


Add  $3.00  fof  shipping,  handling  ond  injuranca.  Illinois  residents 
pleose  odd  bV.%  tax.  Add  $6.00  for  CANADA.  PUERTO  RICO, 
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dollqrs.  WE  DO  NOT  EXPORT  TO  OTHER  COUNTRIES.  EXCEPT 
CANADA.  Enclose  Coshiers  Check,  Money  Order  or  Personal  Check. 
Allow  14  doys  (or  delivery.  2  to  7  days  for  phone  orders,  1  day  express 
mail !  Prices  £  availability  subject  to  change  without  notice, 
VISA  —  MASTER  CARD  —  C.O.D.  No.  C.O.D.  to  Conodo.  APOFPO 


We  LiOx>e  Our  Custotners 

32292  N.  Pepper  Rd.,  Barrington,  Illinois  60010 

312/382-5244  to  order 


The  Amiga  version  of  One-on-One  has 
more  colorful  graphics  and  real-life 
sound  effects. 


and  roaring  when  a  player  makes  a 
basket  (if  the  Amiga  is  hooked  up  to  a 
stereo  sound  system,  you'll  notice  that 
the  cheering  is  loudest  from  the  scoring 
team's  side).  And  if  you  listen  closely, 
you  can  even  hear  a  vendor  wandering 
through  the  crowd  ("Hot  Dogs!  Cold 
Beer!"). 

Two  Superstars 

For  those  unfamiliar  with  One-on-One, 
it's  a  two-man  basketball  game  with  a 
3-D  perspective  of  the  court.  The  two 
ballplayers  are  none  other  than  Larry 
Bird  and  Dr.  J  Uulius  Erving).  Consult- 
ing with  Larry  Bird  and  Dr.  J,  Electronic 
Arts  has  modeled  the  actual  playing 
characteristics  of  the  two  superstars. 
You  control  the  action  with  the  mouse 
or  a  joystick.  Push  forward  to  move 
toward  the  basket,  back  to  move  away, 
and  left  and  right  to  move  laterally.  A 
quick  press  of  the  button  spins  you 
around  (a  "360").  If  you're  holding  the 
ball,  a  long  press  sends  it  flying  towards 
the  basket  (you  have  to  time  it  careful- 
ly). If  you're  not  holding  the  ball,  a  long 
press  sends  your  player  leaping  up  for  a 
rebound  or  attempted  block. 

The  computer  sometimes  adjusts 
your  player's  position.  When  you're 
facing  the  basket  and  the  opposing 
player  shoots,  you  automatically  turn 
around  to  face  the  ball  so  you  can  jump 
up  and  attempt  to  block  it. 

The  game  attempts  to  be  realistic 
without  encumbering  arcade-style 
play.  A  bar  graph  at  the  bottom  of  the 
screen  shows  each  player's  remaining 
energy,  a  sort  of  exhaustion  factor.  As 
your  energy  drains,  from  strenuous 
running,  leaping,  and  blocking,  your 
player  becomes  sluggish,  moves  slow- 
er, is  unable  to  jump  very  high,  and 
misses  more  shots.  If  you  stand  still, 
your  energy  level  builds  as  you  rest. 
When  either  player  takes  a  time  out  or 
when  a  quarter  ends,  both  players  are 
refreshed.  This  is  an  important  part  of 
the  game,  since  if  you  had  infinite  ener- 
gy, you  could  run  the  best  players  off 
the  court. 


Every  feature  of  professional  bas- 
ketball is  here:  the  24-second  shot 
clock,  the  three-point  goal,  and  penal- 
ties for  hacking,  charging,  blocking, 
and  traveling.  However,  the  game 
makes  no  attempt  to  charge  you  for 
goaltending — where  you  try  to  block  a 
shot  on  its  downward  flight  into  the 
basket. 

Although  you  have  a  choice  of 
using  the  mouse  or  a  joystick  in  One- 
on-One,  the  mouse  doesn't  make  a  very 
good  controller  in  this  game.  You  have 
to  keep  moving  it  constantly  to  keep 
your  player  going.  This  is  difficult  with 
limited  desk  space  for  the  mouse.  A 
joystick  affords  much  better  control. 
(Any  Commodore  or  Atari  joystick 
works  with  the  Amiga.) 

Master  Of  The  Slam-Dunk 

While  playing  One-on-One,  I  found  that 
the  simulation  of  the  characters  really 
doesn't  seem  to  affect  the  game  much. 
As  in  real  life,  Larry  Bird  is  nearly  al- 
ways able  to  make  a  three- point  shot 
and  Dr.  J.  is  the  master  of  the  slam- 
dunk,  but  there  doesn't  seem  to  be  all 
that  much  difference  between  the  play- 
ers. (However,  a  76ers  or  Celtics  fan 
might  instantly  notice  some  subtle  nu- 
ances.) In  the  end,  it's  joystick  dexterity 
coupled  with  some  basketball  experience 
that  determines  the  ultimate  winner. 

Pull-down  menus  that  work  with 
either  the  joystick  or  the  mouse  let  you 
select  the  game's  difficulty  level,  loser's 
outs  versus  winner's  outs,  and  whether 
you  are  competing  for  points  or  against 
time.  There  are  four  difficulty  levels: 
Park  &  Rec,  Varsity,  College,  and  Pro. 
You  can  also  play  against  the  computer, 
choosing  which  player  the  computer 
controls.  If  you  can  beat  the  computer 
playing  at  the  Pro  level,  you  can  whip 
most  human  opponents. 

As  proof  of  the  careful  attention 
that  went  into  this  game,  Electronic 
Arts  has  included  several  cute  features 
that  give  the  game  a  special  character. 
When  the  computer  considers  that  it's 
just  observed  a  particularly  interesting 
or  amazing  shot,  it  calls  for  an  Instant 
Replay  that  repeats  the  last  few  sec- 
onds— quite  flattering  if  your  player 
made  the  shot,  but  bound  to  draw  a 
sneer  from  your  opponent.  A  sufficient- 
ly powerful  slam-dunk  can  shatter  the 
backboard,  raining  down  slivers  of 
glass.  A  little  janitor  waddles  out  with  a 
broom,  looks  at  you  and  grumbles,  then 
sweeps  the  fragments  into  his  dustpan. 
This  happened  twice  within  a  few 
hours  of  play,  so  it's  more  likely  to 
happen  than  in  real  life. 

Although  the  graphics  and  sound 
are  uniquely  Amiga,  the  game  play  is 
consistent  with  earlier  versions.  A  testa- 
ment to  careful  research  and  clever  pro- 


gramming, perhaps  this  element  of 
One-on-One  doesn't  really  need  im- 
proving, even  on  such  a  powerful  com- 
puter as  the  Amiga. 

One-on-One 
Electronic  Arts 
1820  Gateway  Drive 
San  Mateo,  CA  94404 
$39.95 


AtariWriter  Plus 


Tom  R.  Halfhill,  Editor 

Requirements:  Atari  400,  800,  XL,  or  XE 

computer  with  at  least  4SK  RAM,  a  disk 
drive,  and  printer.  Special  version  included 
for  130XE. 


The  original  AtariWriter  was  by  no 
means  the  first  word  processor  for  Atari 
computers,  nor  the  most  powerful — but 
it  quickly  became  one  of  the  most  popu- 
lar. Its  manageable  range  of  commands, 
ease  of  use,  and  pop-in  cartridge 
convenience  rapidly  made  it  the  word 
processor  of  choice  for  thousands  of 
beginners  and  experienced  users  alike. 
Now  comes  its  successor:  Atari- 
Writer  Plus.  All  new  and  improved, 
AtariWriter  Plus  nevertheless  retains  a 
familiar  resemblance  to  AtariWriter. 
Significant  new  features  include  an  in- 
tegrated spelling  checker  program  with 
36,000-word  dictionary,  an  integrated 
mail-merge  program,  a  utility  program 
that  lets  you  construct  your  own  printer 
driver  in  case  you  have  an  oddball 
printer,  the  ability  to  take  advantage  of 
the  128K  RAM  in  the  130XE,  selectable 
insert/ strikeover  modes,  optional  hori- 
zontal scrolling  up  to  249  columns, 
double-column  printing,  form-letter 
printing,  support  for  dual-drive  sys- 
tems, and  a  larger  failsafe  buffer. 

Buy  One,  Get  One  Free 

AtariWriter  Plus  comes  on  two  disks 
instead  of  a  cartridge,  and  one  of  the 
disks  is  a  flippy  with  a  different  version 
of  the  program  on  each  side.  One  ver- 
sion works  on  all  eight-bit  Atari  com- 
puters with  at  least  48K  RAM,  and  the 
other  version  works  only  on  the  130XE. 
The  second  disk  contains  the  dictionary 
for  the  spelling  checker. 

There  are  disadvantages  to  this 
new  arrangement,  especially  if  you've 
grown  accustomed  to  the  instant  start- 
up convenience  and  durability  of  the 
AtariWriter  cartridge.  AtariWriter  Plus 
takes  nearly  a  minute  to  load,  and  the 
program  disk  is  copy-protected.  That 
means  if  the  disk  fails  after  the  90-day 
warranty  expires,  you're  out  of  action 
until  you  can  get  another  (at  the  full 
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replacement  cost  of  the  program).  For- 
tunately, the  dictionary  disk  is  not 
copy-protected,  and  that's  the  disk 
which  may  get  the  heaviest  use,  as  we'll 
explain  below. 

When  you  boot  up  AtariWriter 
Plus,  the  first  thing  you  see  after  a  title 
screen  is  the  main  menu.  It's  aimost 
identical  to  the  main  menu  of  Atari- 
Writer  with  these  additions:  Verify 
Spelling,  Global  Format,  Mail  Merge, 
Index  Drive  1,  and  Index  Drive  2.  Verify 
Spelling  and  Mail  Merge  load  those 
corresponding  programs,  which  we'll 
cover  in  a  moment.  The  Index  selec- 
tions call  up  disk  directories  for  one-  or 
two-drive  systems  (AtariWriter  allowed 
access  to  only  one  drive). 

Global  Format  is  a  new  option  that 
changes  the  way  you  format  a  file  for 
printing.  The  old  AtariWriter  always 
places  a  row  of  formatting  commands 
across  the  top  of  your  file;  AtariWriter 
Plus  eliminates  this.  Instead,  Global 
Format  brings  up  a  screen  that  lets  you 
adjust  these  settings  for  any  file  cur- 
rently in  memory.  Settings  include  top 
and  bottom  margins,  page  length,  para- 
graph indention  and  spacing,  type  font, 
justification  on/off,  left  and  right  mar- 
gins, second  left  and  right  margins  (for 
double-column  printing),  page  num- 
bering, line  spacing,  and  page  wait  on/ 
off  (for  single-sheet  or  tractor-feed  pa- 
per). As  before,  all  of  these  settings 
default  to  common  values,  and  you  can 
imbed  additional  formatting  commands 
within  your  file  if  you  need  to  change  a 
setting  partway  through  a  document. 

Although  Global  Format  rids  the 
writing/editing  screen  of  distracting 
formatting  codes,  it  adds  them  to  the 
disk  file.  When  you  save  an  AtariWriter 
Plus  document  from  the  main  menu, 
the  program  no  longer  saves  the  text  in 
standard  ASCII  format  as  AtariWriter 
did.  Instead,  the  formatting  codes  are 
tacked  onto  the  file  as  a  header.  This 
restores  the  settings  when  you  reload 
the  file  later,  but  also  causes  problems  if 
you  try  to  load  an  AtariWriter  Plus  doc- 
ument into  another  word  processor  or 
upload  it  via  modem.  Fortunately,  Atari 
provided  a  solution:  If  you  press  CTRL-S 
at  the  main  menu,  a  Save  ASCII  option 
pops  up.  It  strips  off  the  format  header 
and  saves  the  text  in  straight  ASCII. 

To  convert  an  AtariWriter  file  for 
AtariWriter  Plus,  all  you  have  to  do  is 
delete  the  print  formatting  line  at  the 
top  of  the  document  and  reenter  the 
codes  on  the  Global  Format  screen. 
ASCII  files  created  by  other  word  pro- 
cessors are  easily  converted,  too. 

Adjustable  Screen 

Aside  from  the  missing  format  line  at 
the  top,  the  writing/editing  screen  is 


GET  THE  KNOW-HOW 

TO  REPAIR  EVERY 

COMPUTER  ON  THIS  PAGE. 


Learn  the 

Basics  the 

NRI  Way-and  Earn  Good  Money 

Troubleshoeliflg  Any  Brand  of 

Cempuler 

The  biggest  growth  in  jobs  between  now  and 
1995,  according  (o  Department  of  Latior 
estimates,  will  occur  in  the  computer  service  and 
repair  business,  where  demand  for  trained 
technicians  will  actually  double. 

You  can  cash  in  on  this  opportunity,  once 
you've  learned  ail  the  basics  ot  computers  the  NR] 
way.  NRI's  practical  combination  of  "reason-why" 
theory  and  "hands-on"  building  skills  steuls  you 
with  the  fundamentals  of  electronics,  then  guides 
you  through  advanced  electronic  circuitry  and  on 
into  computer  electronics. 

Yo«  Build-and  Keep-a  16«bit 
Sanyo  personal  computer 

The  vita!  core  of  your  training  is  the  step-by-step 
building  of  the  16-bit  Sanyo  MBC-550  series 
computer.  Once  you've  mastered  the  details  of 
this  IBM-PC  compatible  machine,  you'll  be 
qualified  to  service  and  repair  virtually  every 
major  brand  of  computer,  plus  many  popular 
peripheral  and  accessory  devices. 

With  NRI  training,  you  learn  at  your  own  con- 
venience, in  your  own  home.  You  set  the  pace- 
without  dassroom  pressures,  rigid  night-school  sched- 
ules, or  wasted  time.  You  build  the  Sanyo  IBM  com- 
patible computer  from  the  keylward  up,  with  your 
own  personal  NSl  instructor  and  the  complete  NRI 


IBM  la  a  Rsgla{«r«d  TndemBrfc 
ol  Irlematlonal  Buaineas 
Machine  Corporation. 

Epson  \i  a  Ra^lstanrd 

Tradamarh  or  Epaon 
Ameitca,  Inc. 
Appla  arKl  tha  Appla 
logo  in  Ra^lalatad 
Tradama^a  ol  Apple 
Compular,  Inc. 

Compaq  is  a  Rafllstara^ 
Tradamard  ot  COMPAQ 
Compular  Corporation. 

;  1BM  AT&T 
TBchrtotoglsB, 
Inc. 


technical  staff 
ready  to  answer 
your  questions  or  give 
you  guidance  and  special 
help  whenever  you  need  it. 
Your  NRI  course  includes  Installation  and 
troubleshooting  of  the  "intelligent"  keyt)oard, 
power  supply,  and  disk  drive,  plus  you'll  check  out 
the  8088  microprocessor  functions,  using  machine 
language.  You'll  also  prepare  the  interfaces  for 
future  peripfierals  such  as  printers  and  joysticks. 

100-Page  Free  Catalog  Telh  More 

Send  the  coupon  today  for  NRI's  big  lOO-page 
color  catalog  on  electronics  training,  which 
gives  you  all  the  facts  about  NRI  courses 
in  Microcomputers  and  other  growing  high-tech 
career  fields,  If  the  coupon  is  missing,  wrile  to 
NRI  Schools,  3939  Wisconsin  Ave..  NW, 
Washington,  D,C.  20016. 
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teaching  circuit  design  and  operatlorts;  a  Digital 

Multimeter;  Bundled  Spread  Sheet  and  Word  Processing 

Software  worth  over  S1000  at  retail— and  more. 
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almost  identical  to  AtariWriter's.  It  de- 
faults to  a  width  of  38  columns  and  20 
lines.  Below  this  area  is  a  three-line 
command  window  that  displays  the  tab 
stops,  a  pair  of  counters  for  the  cursor 
position  (column  and  line),  system 
messages,  and  other  information. 

New  additions  to  the  command 
window  are  indicators  for  the  typing 
mode,  caps  lock  mode,  and  number  of 
bytes  free.  The  typing  mode  determines 
whether  newly  typed  characters  make 
room  for  themselves  by  pushing  exist- 
ing characters  forward,  or  whether  they 
simply  replace  existing  characters.  Alari- 
Writer  was  linuted  to  insert  mode,  which 
irked  some  people.  AlariWriter  Plus  de- 
faults to  insert  mode,  but  offers  the 
strikeover  mode  as  well.  The  caps  lock 
indicator  is  only  semi-useful,  since 
you'll  quickly  discover  if  you've  acci- 
dentally hit  this  key  anyway.  The  free 
memory  indicator  is  a  little  more  practi- 
cal, although  it  was  only  a  keystroke 
away  in  the  old  AtariWriter. 

By  pressing  OPTION-C,  you  can 
change  the  default  38-column  screen  to 
any  width  from  5  to  249  columns.  Of 
course,  no  more  than  40  columns  can  be 
displayed  at  a  time,  so  the  screen  scrolls 
horizontally  to  bring  additional  ones 
into  view.  This  makes  it  much  easier  to 
line  up  columns  of  numbers  and  the 
like.  Since  this  setting  can  be  altered  at 
any  time,  you  can  type  in  38-  or  40- 
column  mode  if  you  find  horizontal 
scrolling  distracting,  and  then  switch  to 
a  wider  screen  to  check  the  alignment  of 
your  columns. 

The  column  counter  in  the  com- 
mand window  always  displays  the  cur- 
sor position  relative  to  the  screen's  full 
width,  so  it's  easy  to  keep  track  of  your 
location  on  a  wide  screen.  However,  the 
line  counter  doesn't  do  likewise — it 
stops  at  20  when  you  reach  the  bottom 
of  the  writing/editing  screen,  no  matter 
how  far  down  you  scroll  through  your 
document. 

You  can  zip  through  your  text  a 
little  faster  in  AtariWriter  Plus  because 
the  SELECT  and  cursor-arrow  keys  let 
you  move  a  whole  word  at  a  time  left  or 
right.  Vertical  movement  is  much  quick- 
er because  the  OPTION  up-arrow  and 
down-arrow  keys  now  flip  screens  in- 
stantly rather  than  scrolling  them  slowly 
as  in  the  old  AtariWriter.  And  inciden- 
tally, the  cursor  itself  has  been  changed 
to  a  blinking  block  instead  of  the  blink- 
ing underline  that  was  its  precursor's 
cursor. 

Memory  In  The  Bank 

If  you're  using  a  48K  or  64K  machine, 
AtariWriter  Pius  leaves  12,645  bytes  free 
for  text  (roughly  2,100  words).  That's 
not  much  compared  to  other  word  pro- 
cessors for  the  Atari.  Most  of  them,  in- 


cluding AtariWriter,  leave  at  least  20K 
free. 

If  you're  using  a  130XE,  the  news  is 
a  little  better.  The  130XE  version  on  the 
flip  side  of  the  AtariWriter  Plus  program 
disk  takes  advantage  of  the  extra  RAM 
to  give  you  a  total  of  47,616  bytes  free 
(roughly  7,900  words).  But  there's  a 
catch — the  program  usually  doesn't  see 
this  memory  as  one,  continuous  "blank 
page."  Instead,  the  memory  is  divided 
into  three  sections  called  banks.  The 
technical  reasons  for  this  are  beyond  the 
scope  of  this  review,  but  they're  related 
to  the  memory-addressing  limitations  of 
eight-bit  computers.  Although  it's  possi- 
ble to  get  around  these  limitations,  it's  a 
programmer's  nightmare. 

As  a  result,  AtariWriter  Plus  gives 
you  three  banks  of  15,872  bytes  on  a 
130XE.  When  you  save  and  load  from 
disk,  the  program  does  treat  the  banks 
as  one  continuous  block  of  memory:  a 
long  document  that  occupies  two  or 
three  banks  is  saved  and  loaded  as  a 
single  file.  Almost  all  other  functions, 
however,  require  you  to  deal  with  each 
bank  separately.  For  instance,  to  switch 
from  bank  to  bank,  you  must  press 
START-B.  To  move  the  cursor  to  the 
top  or  bottom  of  the  file,  you  can't 
simply  press  SELECT-T  or  SELECT-B 
as  usual;  these  commands  move  the 
cursor  only  to  the  top  or  bottom  of  the 
current  bank.  You  can  move  blocks  of 
text  from  one  bank  to  another,  but  you 
can't  define  a  text  block  that  crosses  a 
bank  boundary.  Search  and  replace  op- 
erations won't  bridge  the  bank  bound- 
aries either,  but  the  search  and  replace 
strings  remain  intact  so  you  can  contin- 
ue the  operation  after  switching  banks. 

Another  limitation  is  that  you  can't 
merge  a  file  across  banks.  In  other 
words,  if  you've  got  a  10,000-byte  file 
in  memory,  you  can't  merge  it  with 
another  file  that  is  6,000  bytes  long  or 
more  without  exceeding  the  banks' 
15,872-byte  capacities.  (If  you  can 
merge  the  two  files  outside  of  the  pro- 
gram— perhaps  with  DOS — you  can 
load  the  joined  file  as  a  single  docu- 
ment, though.) 

One  interesting  command 
(OPTION-F)  redistributes  your  text 
equally  among  all  three  banks.  For  in- 
stance, if  you  fill  up  bank  1,  continue 
writing  in  bank  2,  and  later  decide  to 
insert  a  paragraph  in  bank  1,  you  can 
press  OPTION-F  to  free  up  some  mem- 
ory. Your  document  will  be  split  across 
three  banks — somewhat  awkward,  but 
at  least  you'll  have  room  for  your  insert. 
When  you  load  a  long  file  that  won't  fit 
in  a  single  bank,  this  redistribution  hap- 
pens automatically. 

Other  Enhancements 

Like  AtariWriter,  AtariWriter  Plus  pre- 


serves deleted  blocks  of  text  in  a  failsafe 
buffer  so  you  can  restore  them  or  paste 
them  elsewhere  in  the  document.  But 
while  AtariWriter's  failsafe  buffer  has 
only  enough  memory  for  less  than  two 
screenfuls  of  text,  AtariWriter  Plus  sets 
aside  all  remaining  text  memory  for  the 
buffer.  That  means  the  failsafe  buffer 
can  range  in  size  from  more  than 
12,000  bytes  to  0  bytes,  depending  on 
how  much  you've  written.  A  new  com- 
mand (START-E)  lets  you  erase  the 
buffer  if  it  gets  too  full  to  let  you  contin- 
ue writing. 

The  130XE  version,  however,  al- 
ways sets  aside  about  8K  for  the  failsafe 
buffer. 

Defining  text  blocks  is  handled  a 
little  differently,  too.  Instead  of  mark- 
ing the  beginning  and  ending  points  of 
a  block  with  CTRL-X,  as  you  do  in 
AtariWriter,  you  mark  the  beginning 
with  OPTION-B,  When  you  move  the 
cursor,  the  characters  you're  defining  as 
a  block  become  highlighted  in  inverse 
video.  Then  you  mark  the  end  of  the 
block  with  a  different  command  that 
depends  on  which  operation  you  want 
to  perform.  For  example,  to  indicate  the 
end  of  a  text  block  you  want  to  delete, 
vou  press  OPTION-DELETE/BACK 
SPACE.  A  DELETE  BLOCK  Y/N?  mes- 
sage asks  you  to  confirm  your  choice. 

AtariWriter  Plus  lets  you  perform 
several  other  operations  on  text  blocks 
as  well.  OPTION-W  counts  the  number 
of  words  in  a  block,  (When  you  press 
OPTION-W  without  defining  a  block, 
the  program  counts  all  the  words  in 
your  document — or  in  the  current  bank 
on  a  130XE.)  OPTION-A  alphabetizes 
all  the  words  in  a  block.  OPTION-S 
saves  the  block  on  disk.  And  OPTION- 
E  copies  the  block  into  the  failsafe  buff- 
er so  you  can  paste  it  elsewhere. 

Another  new  feature  is  form  print- 
ing. Let's  say  you  need  to  print  out  a 
number  of  form  letters  with  different 
names,  addresses,  or  other  information 
inserted  at  certain  points.  You  can  indi- 
cate those  points  by  pressing  OPTION- 
INSERT;  an  arrow  appears  on  the 
screen.  Later,  the  printer  will  pause  at 
those  points  and  let  you  type  up  to  35 
characters. 

So  many  other  improvements  have 
been  added  to  AtariWriter  Plus  that  we 
can't  cover  them  all  in  detail.  For  in- 
stance, you  can  search  forward  and 
backward,  search  and  replace  control 
characters  and  specify  wildcards  in 
search  strings,  turn  the  alert  beep  on 
and  off  (except  for  keystrokes  and  error 
messages),  print  text  in  double  columns 
for  newsletters,  and  construct  your  own 
custom  printer  drivers  with  a  BASIC 
program  that's  included.  Furthermore, 
the    80-column    (horizontal-scrolling) 
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MASTER  CARD  4%  VISA  4% 
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The  1050  DUPLICATOR  IS  HERE... 


THE  1050  DUPLICATOR:  The  most  powerful 
diskdrlve  copy  system  ever  developed  for  thie  ATARI. 


520  ST 
Duplicator 

Now  available' 


The  only  Copy  System  You  will 
ever  need! 

What  will  if  do? 

^The  main  purpose  oftDe  Duplicator  It  to  copy  ditlitl  You  will  Oe 
oWe  to  copy  just  about  on^diskl  The  copies  you  moke  will  run  on 
onyAtofi  drive  The  Duplicator  need  nof  De  p/esenf  to  run  your 
backup  copies  The  Duplicator  is  fully  automatic  Yau  need 
only  insert  source  and  desPr^ation  disks.  Custom  lormats  will 
be  read  and  in  turn  reproduced  on  fhe  backupcopydisk. 
Our  device  will  reproduce  any  custom  format  or  tteavily 
copy  guarded  scfieme.  Pad  sectors,  double  sectors, 
1 9  ttirough  24  sector  forrr\ot  wilt  present  no  problem 
to  ttie  Duplicator 

^  Vou  will  still  have  single  (ier]ilty,  density  ar)d 
arte  l^alf,  artd  double  density.  When  you  have  a 
Duplicator  installed  m  a  1050  drive  that  driVe  will  be 
turned  into  true  double  density.  You  will  have  twice 
the  disk  storage.  Your  drive  will  be  campatiole  wit^^  other 
double  aenstty  drives  as  The  ffcna  Indus  Percom  etc 

HARDWARE  POWER 

Fully  Compatible  with  the  XL  &  New  XE  Series 


■High  speed  read  A  write.  Your  disk  drive  mill  read  and  load 

all  of  your  software,  saving  wear  and  tear  on  your  drive  The 

1050  drive  now  reads  one  sector  at  a  time  This  is  slow  and 

inetticlent.  With  the  duplicator  installed  you  will  be  able 

to  read  eighteen  sectors  in  the  time  it  takes  standard. 

unenhanced  drives  to  read  one 

Included  with  every  Duplicator  will  be  user 

Mendly  disk  software.  A  simple,  menu  ariven 

program  will  allow  you  to  copy  an  of  your 

software  A  Duplicator  enhanced  drive  will 

be  a  SMATlTdrive.  We  plan  to  write  mony 

new  and  exciting  programs  that  can  only  be 

run  on  an  enhanced  drive,  eg   sending  a 

copy-guarded  disk  over  the  phone  Since  the 

drive  IS  now  fully  programmable,  future  upgrades 

can  be  made  available  to  you  on  disks,  should  the 

need  arise.  /Vb  further  hardware  changes  will  ever  be 

needed.  The  Duplicator  carries  with  a  full  hardware  and 

software  guarantee 
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EASY  5  MINUTE  INSTALLATION 

NO  HARM  TO  VOUR  DRIVE  OR  INCOMPATIBILITV  PROBLEMS  CAN  EVER  ARISE  AS  A  RESULT  OF  THE  [NSTALIATION  OF  OUR  DURIOTOR 

IMPORT  ANT: -^"'y  °  hotdware  device  like  the  DUPLICATOR  can  backup  heavily  copy-guarded 
'  disks.  Don't  be  fooled  by  software  programs  ttiat  claim  to  do  Itiis. 

DUPLICATING  TECHNOLOGIES  inc 

Formerly  Gardner  Computing 

99J^richo  Tpke..  Suite  302A  Jericho  N.Y.  1 1 753    Sfi^H  Hrs.  (516)  333-5805,  5807,  5808  ^/il^kena,  (516)  333-5950 

TERMS:  We  accept  American  Express.  V/JO.  MasterCard  and  C.O.D.  orders.  Foreign  orden  must  be  in  VS.  dollars.  All  personal  checks  oflaw  U  days  to  cleor  Mott  tiems 
shipped  wifhin  24  hours 


print-preview  feature  has  been  im- 
proved: It  now  can  show  foreign- 
language  characters  if  you  have  an  XL 
or  XE,  and  it  even  displays  a  preview  of 
double-column  printing. 

Editor  On  A  Disk? 

One  of  the  most  significant  additions  to 
AtariWriter  Plus  is  Atari  Proofreader,  a 
spelling-checker  program.  Although 
it's  integrated  with  AtariWriter  Plus,  it's 
not  memory-resident.  That  means 
when  you  select  Verify  Spelling  from 
the  main  menu,  you  have  to  insert  the 
program  disk  and  wait  a  half-minute  or 
so  as  Atari  Proofreader  replaces  Atari- 
Writer  Plus  in  memory.  The  same  proce- 
dure is  necessary  when  returning  to  the 
word  processor  from  the  spelling  check- 
er. Fortunately,  your  text  file  is  pre- 
served in  memory  during  this  exchange. 

Once  Atari  Proofreader  is  up  and 
running,  you  insert  the  dictionary  disk 
and  choose  from  several  options  (on  a 
two-drive  system,  less  disk-swapping  is 
required).  Highlight  Errors  checks  the 
whole  document  and  highlights  in  in- 
verse video  any  words  the  Proofreader 
doesn't  recognize;  Correct  Errors  also 
highlights  unrecognized  words,  but 
then  pauses  and  lets  you  type  in  the 
correct  spelling;  Print  Errors  proofreads 
the  document  and  dumps  all  unrecog- 
nized words  on  a  printer;  Dictionary 
Search  lets  you  look  up  words  on  the 
dictionary  disk  by  typing  in  your  best 
guess  as  to  how  they're  spelled;  File 
Personal  Dictionary  saves  on  disk  a 
short  dictionary  of  your  own  special 
words;  Add  Personal  Dictionary  loads 
one  of  these  special  dictionaries  from 
disk;  Index  Drive  1  or  2  calls  up  disk 
directories;  Load  File  loads  a  document 
for  proofing;  Save  File  saves  a  proofed 
document;  and  Return  To  AtariWriter 
Plus  exits  the  spelling  checker  back  to 
the  word  processor. 

Like  all  spelling  checkers,  Atari 
Proofreader  lets  you  add  your  own  list  of 
special  words  to  the  dictionary.  This 
keeps  the  checker  from  highlighting 
certain  technical  terms  or  proper  names 
that  you  frequently  use.  Building  a  per- 
sonal dictionary  is  easy.  When  proofing 
a  file  with  the  Correct  Errors  option, 
you  can  press  a  key  that  tells  the  check- 
er to  remember  a  word  it  didn't  recog- 
nize. Later,  you  can  save  these  words 
on  disk  as  a  personal  dictionary.  You 
can  also  build  a  dictionary  by  simply 
creating  a  new  file  with  AtariWriter  Plus 
and  typing  in  a  word  list. 

The  personal  dictionaries  are  fairly 
limited,  however.  Atari  Proofreader  re- 
members only  the  last  256  words  it 
highlighted  when  checking  a  file.  The 
maximum  space  available  for  a  person- 
al dictionary  is  8,400  bytes  on  a  48K  or 
64K   Atari— and,    oddly,    only    4,396 
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The  writing /editing  screen  of  Atari- 
Writer  Plus  can  now  scroll  horizontally 
as  wide  as  249  columns. 

bytes  on  the  128K  RAM  130XE,  Since 
the  average  English  word  is  about  six 
letters  long,  that  breaks  down  to  about 
1,200  words  on  a  48K/64K  machine,  or 
about  628  words  on  a  130XE.  Of  course, 
the  kind  of  words  you'll  include  in  a 
personal  dictionary  will  probably  aver- 
age longer  than  six  letters,  so  these 
word  counts  may  be  misleading.  To  get 
around  this  limitation,  though,  you  can 
create  several  personal  dictionaries  and 
proof  a  document  in  more  than  one  pass. 
However,  it  takes  Atari  Proofreader 
quite  a  while  to  check  a  large  docu- 
ment— mainly  because  it  must  read  the 
dictionary  disk  constantly  when  proof- 
ing a  file  (a  good  reason  for  backing  up 
the  disk).  This  3,000-word  review,  writ- 
ten with  AtariWriter  Plus  on  a  130XE 
with  a  1050  disk  drive,  took  the  Proof- 
reader 15  minutes  to  check.  Of  course, 
even  a  good  copy  editor  (the  kind  that 
doesn't  come  on  a  disk)  would  take  at 
least  that  long. 

Mall  Merge 

Another  integrated  program  is  Atari 
Mail  Merge.  Like  Atari  Proofreader,  it 
must  be  loaded  from  disk  and  swapped 
in  memory  with  AtariWriter  Plus.  It's  a 
general-purpose  filing  program  that  lets 
you  compile  a  list  of  names  and  ad- 
dresses (or  any  other  kind  of  infor- 
mation, for  that  matter)  and  merge 
them  into  form  letters. 

Mail  Merge  can  handle  a  file  up  to 
22,292  bytes  long.  This  file  can  include 
as  many  as  255  records,  and  each  re- 
cord can  contain  up  to  15  fields  of  20 
characters  each.  When  creating  a  fUe, 
you  can  design  your  own  record  format 
or  use  the  default  format.  You  can  then 
edit,  append,  and  print  these  files  with 
Mail  Merge. 

To  use  Mail  Merge  with  AtariWriter 
Plus,  you  press  OPTION-M  at  the  point 
in  your  document  where  you  want  to 
insert  information  from  Mail  Merge.  A 
heart  character  appears  on  the  screen, 
and  you  follow  it  with  a  number  that 
indicates  which  field  you  want  printed 
(1  to  15).  When  you  print  the  docu- 
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Atari  Proofreader,  another  new  feature 
of  AtariWriter  Plus,  checks  your  spelling 
against  a  36,000'Word  dictionary  and 
highlights  any  mistakes. 

ment,  the  information  from  that  field  is 
inserted  into  your  text.  This  is  a  particu- 
larly useful  feature  for  printing  out  form 
letters  and  address  labels. 

You  can  also  define  a  subset  of  a 
Mail  Merge  file.  For  instance,  you  could 
send  form  letters  to  only  ten  people  out 
of  a  list  of  100. 

Integrated  features  like  Mail  Merge 
and  the  Proofreader  elevate  AtariWriter 
Plus  to  the  upper  rank  of  word  proces- 
sors for  Atari  computers.  It's  still  not  the 
most  powerful  or  full-featured  word 
processor  you  can  buy  for  your  Atari. 
But  like  its  popular  predecessor,  Atari- 
Writer  Plus  strikes  a  good  balance  be- 
tween versatility  and  ease  of  use. 

AtariWriter  Plus 

Atari  Corp. 

1196  Borregas  Avenue 

Sunnyvale,  CA  94088 

$49.95 


Borrowed  Time 

Selby  Bateman,  Features  Editor 

Requirements:  Commodore  64  or  128;  Apple 
U-series  computer  with  at  least  64K  RAM; 
IBM  PC  with  color/graphics  adapter  and 
at  least  64K  RAM;  Enhanced  Model  IBM 
PCjr;  Atari  ST-series  computer;  Commo- 
dore Amiga;  or  an  Apple  Macintosh.  Disk 
only;  color  monitor  recommended. 

Your  name's  Harlow.. .Sam  Harlow, 
private  eye. 

You're  sitting  in  your  office  with 
your  feet  propped  up,  trying  to  figure 
out  how  to  pay  the  rent,  when  the 
phone  rings.  "Sam,  they  want  you 
dead,"  says  a  voice  at  the  other  end  of 
the  line.  The  voice  fades,  and  you  get 
the  funny  feeling  someone's  watching 
you.  Before  you  know  it,  people — all 
kinds  of  people — are  doing  more  than 
watching.  They're  coming  after  you. 
And  you're  living  on  borrowed  time. 
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Your  secretary,  Iris  Spencer,  has 
taken  a  powder;  Jerry  the  bartender 
freezes  when  you  ask  about  Farnham; 
Hawkeye,  the  blind  newspaper  vendor, 
has  a  tip  about  Fred  Mongo;  Dave,  who 
runs  the  corner  hotdog  stand,  thinks 
you're  trying  to  pin  a  hamburger  rap  on 
him.  He  keeps  throwing  hotdogs  at 
you.  And  now  someone's  kidnapped 
your  wife,  Rita, 

Life's  tough  in  the  big  city  for  a 
down-in-the-heels  gumshoe,  and  never 
tougher  than  in  Activision's  graphic- 
and-text  adventure.  Borrowed  Time.  But 
you  don't  have  an  opportunity  to  feel 
sorry  for  yourself.  People  keep  break- 
ing down  your  door,  running  after  you 
in  dark  alleys,  and  unloading  .38s  in 
your  direction.  It's  up  to  you,  Sam.  Find 
out  who's  sending  all  those  thugs  after 
you,  and  quickly.  One  more  thing,  Sam. 
You'd  also  better  find  out  why. 

Fun,  Not  Frustrating 

In  Borrowed  Time,  Activision  has  creat- 
ed a  delightful  game  environment  with 
the  look  and  feel  of  those  classic  hard- 
boiled  detective  movies  and  novels. 
The  game  is  also  fun  to  work  with, 
easier  and  faster  than  earlier  graphics- 
and-text  games  (especially  the  ST  and 
Amiga  versions).  Some  computer  ad- 
ventures can  be  frustrating,  limiting 
your  options  with  complex  puzzles  to 
such  an  extent  that  just  leaving  a  room 
can  take  hours  of  problem-solving.  Bor- 
rowed Time  offers  a  plot  line  and  puz- 
zles that  are  intriguing  and  challenging 
without  demanding  that  you  enroll  in  a 
code-breaking  class. 

The  screen  format  and  game 
movement  are  very  well  executed  in 
Borrowed  Time.  The  screen  is  divided 
into  six  sections:  a  graphics  window 
showing  scenes  representing  the  action 
described  in  the  text;  a  scrolling  text 
window  along  the  bottom  third  of  the 
screen;  an  inventory  window  display- 
ing what  you're  carrying;  a  compass 
showing  north,  south,  east,  and  west; 
and  two  lists  of  words,  verbs  on  the  left 
and  nouns  on  the  right. 

Using  a  joystick  or  mouse  (depend- 
ing on  the  computer),  you  can  quickly 
select  the  direction  you  wish  to  travel, 
choose  verb-noun  commands  from  the 
lists,  and  even  examine  or  drop  what 
you're  carrying  by  pressing  the  mouse 
or  joystick  button.  Of  course,  you  can 
still  type  in  all  the  commands  if  you'd 
prefer,  and  the  game's  vocabulary  is 
much  more  extensive  than  just  the  cou- 
ple of  dozen  words  listed  on  the  screen 
at  any  one  time.  With  the  mouse  or 
joystick,  and  especially  with  the  fast 
disk  access  of  computers  like  the  ST, 
Amiga,  and  Macintosh,  you  can  travel 
very  rapidly  from  place  to  place  with  a 
minimum  of  typing.  There  is,  naturally. 


The  Atari  ST  version  of  Borrowed  Time 
has  the  best  graphics  of  all. 

much  disk  access.  Depending  on  the 
computer,  this  can  be  frustratingly  slow 
(Commodore  64  and  1541  disk  drive)  or 
amazingly  swift  (Atari  ST), 

Making  a  map  of  your  travels 
through  the  city  is  almost  mandatory. 
There  are  many  different  locations,  and 
an  engaging  (and  often  dangerous)  cast 
of  characters.  You  can  usually  converse 
with  the  people  you  see,  some  of  whom 
may  not  always  tell  you  the  truth.  Just 
like  any  good  private  eye,  you'll  want 
to  examine  everything  and  watch  the 
different  screens  for  visual  clues  to  help 
you  solve  the  mystery  or  escape  from 
tight  spots. 

Life  Is  Tough 

As  Sam  Harlow,  you're  prone  to  meet 
with  a  lot  of  "accidents,"  resulting  in 
the  frequent  untimely  end  of  the  game. 
But  Activision  has  provided  both  a 
QUICKSAVE  and  a  QUICKLOAD  com- 
mand that  helps  keep  you  in  the  action. 
If  you  hear  someone  pounding  on  your 
door,  if  a  shadow  suddenly  looms  be- 
hind you,  or  if  there's  the  quiet  click  of  a 
hammer  being  drawn  back  on  a  gun, 
you'd  be  well  advised  to  use  the 
QUICKSAVE  command.  Then,  should 
something  happen  to  you,  use  QUICK- 
LOAD  and  you're  back  where  you  were 
just  before  your  accident. 

The  designers  of  Borrowed  Time  ob- 
viously had  a  lot  of  fun  putting  the 
pieces  together.  There's  a  sense  of  hu- 
mor in  the  text,  and  the  visuals  can  be 
charming.  Clothes  hanging  on  a  line 
ripple  in  the  wind,  a  dog's  tail  wags  and 
his  tongue  peeks  out  as  he  pants,  the 
telephone  receiver  bounces  in  its  cradle 
as  it  rings,  and  occasionally  a  character 
will  glance  at  you  from  the  corners  of 
his  eyes.  As  bullets  whine  over  your 
head,  your  natural  inclination  may  be 
to  type  in  the  command,  DUCK!.  All 
you'll  get  for  that  is  the  response, 
QUACK!. 

In  addition  to  a  concise  printed 
explanation  of  game  rules  and  features, 
the  program  also  contains  a  tutorial  on 
the  disk  which  helps  first-time  players 
get  started.  However,  so  intuitive  is  the 


feel  of  Borrowed  Time  that  you  can  boot 
the  disk  and  start  to  play  without 
knowing  anything  about  the  game.  The 
program  and  the  graphics  can  vary 
slightly  from  computer  to  computer, 
depending  on  the  differing  technical 
capabilities  of  various  machines.  But 
game  play  appears  to  be  quite  similar 
throughout. 

You  can  have  a  lot  of  fun  with 
Borrowed  Time.  Just  keep  checking  over 
your  shoulder,  keep  moving,  and  ex- 
pect the  worst. 

Borrowed  Time 

Activision,  Inc. 

2350  Bay  shore  Frontage  Road 

Mountain  View,  CA  94043 

$29-$44  (depending  on  the  version) 


Europe  Ablaze 
For  Commodore 
And  Apple 

Neil  Randall 

Requirements:  Commodore  64  (or  128  in 
64  mode);  or  an  Apple  ll-series  computer 
with  at  least  64K  RAM.  Disk  only. 

Europe  Ablaze  is  the  third  game  from  the 
Strategic  Studies  Group  of  Australia. 
Their  first  effort.  Reach  for  the  Stars, 
remains  one  of  the  most  popular  com- 
puter wargames  ever  released,  and 
their  second.  Carriers  at  War,  won  the 
Charles  Roberts  Award  at  last  year's 
Origins  gaming  convention  for  best 
computer  game  of  the  year.  Add  the 
fact  that  SSG's  games  are  now  being 
distributed  by  Electronic  Arts,  and  we 
can  see  that  SSG  has  quickly  become 
one  of  the  leading  designers  of  com- 
puter wargames.  And  when  you're  at 
the  top,  people  expect  great  things. 

For  those  expecting  excellence,  Eu- 
rope Ablaze  will  not  disappoint.  The 
game  is  a  simulation  of  the  World  War 
II  air  war  over  Germany  and  England. 
The  three  scenarios  included  with  the 
game  cover  the  Battle  of  Britain,  1940 
(the  one  with  Churchill's  famous 
speech);  the  summer  1943  U.S.  and 
British  bombing  offensive;  and  the 
1944  attempt  to  bomb  Germany  into 
submission. 

Like  Carriers  at  War,  though,  Eu- 
rope Ablaze  is  not  restricted  to  the  sce- 
narios provided.  A  detailed  but 
remarkably  easy  scenario  design  kit  al- 
lows you  to  alter  the  existing  scenarios 
or  add  new  ones  of  your  own.  One  such 
scenario,  which  covers  the  Mediterra- 
nean bombing  campaign  of  1943,  is 
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included  in  the  design  book.  With  suffi- 
cient research,  historians  and  air  war 
buffs  can  work  up  their  own. 

Like  Carriers  at  War,  Europe  Ablaze 
is  entirely  menu-driven.  By  simply  ask- 
ing you  to  type  Y  or  M,  the  menus  guide 
you  through  all  the  game's  activities, 
from  formatting  a  disk  to  ordering  an 
interception.  You  can  command  your 
squadrons  to  perform  reconnaisance, 
execute  sweeps  and  raids,  or,  at  the 
heart  of  the  game,  fly  bombing  mis- 
sions to  the  target  of  your  choice.  And 
you  don't  just  send  them  someplace; 
you  tell  them  how  to  get  there  and  what 
to  do.  You  can  target  bombs  against 
ports,  against  communications  facili- 
ties, against  industry,  or  against  popu- 
lation. And  you  can  fly  straight  to  the 
target  or  divide  the  flight  into  two  or 
three  "legs"  to  confuse  the  enemy.  In 
other  words,  you  must  make  the  same 
kinds  of  choices  your  historical  counter- 
parts had  to  make. 

Two  Different  Roles 

To  this  end,  Europe  Ablaze  is  actually 
two  games  in  one.  If  you  want  to  avoid 
the  detailed  mission  and  squadron 
planning,  you  can  assume  the  role  of 
Commander-in-Chief.  In  this  role,  you 
issue  general  orders  to  each  of  your  Air 
Fleets,  and  the  computer  carries  out 
your  orders.  If  you  want  to  take  your 
Commander-in-Chief's  orders  and  car- 
ry out  the  actual  missions,  you  can  se- 
lect the  role  of  Air  Fleet  Commander. 
This  role  is  more  time-consuming,  but 
because  you  have  more  to  do  it  is  also 
more  interesting. 

You  need  not  restrict  yourself  to 
one  or  the  other,  however.  At  the  be- 
ginning of  the  game,  the  program  asks 
you  which  commands  are  to  be  human- 
controlled  and  which  computer- 
controlled.  If  you're  playing  the  game 
with  friends  (up  to  12),  each  can  take  a 
different  command,  and  the  realism 
multiplies  as  each  commander  de- 
mands missions  and  materials  to  suit 
his  own  objectives.  Europe  Ablaze  im- 
pressively establishes  the  levels  of  com- 
mand; as  Commander-in-Chief,  you 
will  be  helpless  once  you've  issued 
your  orders,  and  as  Air  Fleet  Com- 
mander, you  must  often  make  the  best 
of  orders  you  don't  agree  with.  That's 
the  way  the  Air  Force  works. 

As  mentioned  earlier,  those  ex- 
pecting excellence  should  be  very  satis- 
fied by  Europe  Ablaze.  But  those  hoping 
for  innovation  may  not  be.  Europe 
Ablaze  extends  the  menu-driven  system 
of  Carriers  at  War,  smoothing  it  out  and 
allowing  the  player  a  bit  more  freedom. 
But  sometimes  the  game  plays  too 
much  like  its  forerunner. 

Still,  we're  beginning  to  see  more 
and  more  refinements  of  existing  war- 


game  systems,  and  as  long  as  designers 
refine — and  not  simply  copy — the  re- 
sult will  be  games  of  superior  quality. 
Europe  Ablaze  is  a  fine  simulation  that 
uses  a  proven  game  system.  We  can't 
ask  for  much  more. 

Europe  Ablaze  - 
Strategic  Studies  Group 
(Distributed  by  Electronic  Arts} 
2755  Campus  Drive 
San  Mateo,  CA  94403 
$49.95 


Ultima  IV: 
Quest  For  The 
Jia/atar  For  Apple 
And  64 

James  V.  Trunzo 

Requirements:  Apple  Il-series  computer 
with  at  least  64K  RAM  (Mockingboard 
sound  enhancer  optional);  or  a  Commo- 
dore 64  or  128  (in  64  mode).  Disk  only.  The 
Apple  version  zvas  reviexved. 

Just  when  you  thought  it  was  safe  to 
venture  forth  into  the  land  of  Britannia, 
along  comes  Ultima  IV:  Quest  for  the 
Avatar.  The  sequel  to  Ultima  III  certain- 
ly appears  to  live  up  to  its  advance 
notice.  I  say  appears  because  I've  spent 
only  a  dozen  or  so  hours  adventuring  in 
the  world  of  Britannia,  and  therefore 
can't  claim  to  be  all-knowledgeable 
about  the  surprises  lurking  in  this 
game.  However,  considering  the  tre- 
mendous scope  of  Ultima  IV,  if  I  waited 
until  completely  finishing  the  game 
before  reviewing  it.  Ultima  X  would 
probably  be  on  the  market  by  then.  The 
world  of  Ultima  IV:  Quest  for  the  Avatar 
is  approximately  16  times  larger  than 
that  of  its  predecessors. 

But  map  size  is  hardly  the  only 
difference  between  Ultima  IV  and  the 
other  Ultimas,  it  is  a  tribute  to  the  de- 
signers' programming  skills  and  cre- 
ative genius  that  Ultima  IV  quickly 
establishes  its  own  identity  while  con- 
tinuing the  by-now  familiar  play  format 
employed  in  Ultima  I  through  ///. 

While  Qwest  for  the  Avatar  retains 
many  of  the  standard  features  of  the 
previous  programs,  it  also  has  a  heavy 
philosophical  bent  that  comes  very 
close  to  moralizing.  At  the  least,  it  puts 
quite  an  emphasis  on  virtues  that  lead 
to  a  "good"  life:  honesty,  valor,  charity, 
etc.  The  player  should  never  lose  sight 
of  this  emphasis  when  making  deci- 
sions throughout  the  game.  Of  course, 
philosophical  contemplations  are  well 


and  good,  but  they  aren't  tremendously 
useful  against  the  aggressive  monster- 
types  that  beset  you  during  your  quest. 

Recipes  For  Magic 

Combat  and  magic  are  still  of  major 
importance  in  liffi'mfl  IV.  The  procedure 
for  combat  is  unchanged,  but  a  new 
level  of  sophistication  has  been  reached 
for  the  use  of  magic.  No  longer  can  you 
simply  cast  a  spell.  Instead,  reagents 
(ingredients)  must  be  purchased  and 
properly  mixed  before  using  a  spell — 
and  woe  on  you  if  you're  struggling  to 
prepare  your  magic  while  five  trolls  are 
attacking  your  party.  The  Book  of 
Spells  lists  the  ingredients  you  need, 
but  in  many  cases  it's  up  to  you  to 
discover  the  proper  portions  of  each 
ingredient.  What  does  it  take  to  make  a 
fireball — two  parts  bloodmoss  and  one 
part  sulfurous  ash,  or  vice  versa? 

There's  more,  of  course.  At  the  risk 
of  revealing  too  much,  be  aware  that  in 
Ultima  IV  you  do  not  pick  your  party  of 
adventurers;  they  pick  you.  If  you're 
unworthy  of  help  from  a  powerful  Pala- 
din, for  example,  you'll  have  to  gain 
more  experience  before  receiving  his 
aid.  Even  the  creation  of  your  player 
character  is  handled  in  a  unique  and 
fascinating  way.  You  no  longer  simply 
state  your  preference  for  character  type 
and  race,  1  won't  tell  you  what  happens 
instead  because  it  would  rob  you  of  one 
of  the  initial  enjoyments  when  playing 
Ultima  IV.  After  discovering  this  for 
yourself,  you'll  be  glad  I  was  discreet, 

The  package  is  similar  to  previous 
versions  of  the  Ultima  series.  It  includes 
a  cloth  map,  a  Book  of  Magic,  a  History 
of  Britannia,  and  two  game  disks.  All 
the  material  is  top  quality,  and  the  man- 
uals are  eminently  readable.  If  you  get 
hopelessly  stuck,  a  hint  book  will  be 
available  containing  maps  and  clues. 
This  makes  it  possible  for  less  industri- 
ous adventurers  (like  me)  to  have  a 
chance  of  completing  the  game  in  their 
lifetimes. 

For  those  who  have  never  experi- 
enced any  of  the  Ultima  games,  note 
that  it  isn't  necessary  to  have  played  the 
forerunners  in  order  to  enjoy  Ultima  IV: 
Quest  for  the  Avatar.  However,  my  bet  is 
that  once  you  play  one,  you'll  want  to 
play  them  all. 

Ultima  IV:  Quest  for  the  Avatar 

Developed  by: 

Origin  Systems,  Inc. 

Distributed  by: 

Electronic  Arts 

2755  Campus  Drive 

San  Mateo,  CA  94403 

$64  ® 
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Explore  Pascal  with  • 


THE 

roil®  ^i 


i/A 


HANDBOOK 

from  COMPUTEI. 


The  Turbo  Pascal  Handbook 
Edward  P.  Faulk 

With  The  Turbo  Pascal  Handbook  and  Turbo  Pascal  from 
Borland  International,  you'll  be  gently  guided,  step-by-step, 
until  you're  creating  your  own  powerful  applications  in  this 
impressive  computer  language, 
$14.95     ISBN  0-87455-037-8 


This  information-pocked  book  from  COMPUTE!  is  an  outstanding  resource  and 
programming  guide.  And  it's  written  in  COMPUTEI's  bestseiiing  style  so  that  even 
beginning  programmers  can  quickly  and  easily  understand  aii  the  applications. 

Ask  for  The  Turbo  Pascal  Handbook  at  your  local  computer  store  or  bookstore. 
Or  order  directly  from  COMPUTE!.  Call  toll  free  T -800-346-6767  (in  NY  212-887-8525) 
or  mail  the  attached  coupon  with  your  payment  (plus  $2.00  shipping  and 
handling  per  book)  to  COMPUTE!  Books.  P.O.  Box  5038.  F.D.R.  Station.  New  York, 
NY  10150. 

Note:  You'll  need  Turbo  Pascal  in  order  to  use  this  book.  The  software  is  not  included  with  The  Turho  Pascal 
Handbook. 


YesI  Send  me  . 


My  payment  Is  enclosed. 


copies  of  The  Turbo  Pascal  Handbook  a*  S  14.95  each. 
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NC  residents  add  4.5%  sales  tax 

Shipping  and  handling 


CS2.00  per  book  in  U.S.  and  surface 
maiJ;  $5.00  per  bool<  airmail.) 

D  Payment  enciosed  (check  or  money  order)  Total  enclosed 
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Account  No ^  Exp.  Date  . 

Name ^ 

Address 

City 


(Requrred) 


State  . 


L. 


Please  ollow  4-6  weeks  for  dellverv. 


.Zip. 


365037 1 1 


COMPUTEr  Publications  jnc.  ® 

One  of  the  ABC  PublistiJng  Companies  ^^^^ 

826  7tn  Avenue.  6th  Floor.  New  York,  NY  10019  ^^ 

l-ubwnffli  d  COMWTE..  COMPUIE'-s  GojsTle,  COW»njTE'-s  Go!e.le  l>«.  compute.  80*5.  ana  COMPUrer,  AppB  Acpscohoos 


J 


All  the  exciting, 

entertaining,  and 

educational  games, 

applications,  and  utilities 

from  COMPUTE!  magazine 

are  now  available  on  disk 

for  your  Commodore, 

Atari,  Apple,  or  IBM 

personal  computer. 

The  COMPUTE!  Disk 


A  new  COMPUTE!  Disk  is  published 
every  month,  rotating  among  the  four 
major  machines  covered  by  COMPUTE!: 
Commodore  64  and  128;  Atari  400/800, 
XL,  and  XE;  Apple  Il-series;  and  IBM  PC, 
PCjr,  and  compatibles. 

Every  three  months  you  can  receive 
a  disk  with  all  the  quality  programs  from 
the  previous  three  issues  of  COMPUTE! 
that  will  run  on  your  brand  of  computer. 

Like  the  popular  COMPUTERS  Ga- 
zette Disk,  the  COMPUTE!  Disk  is  ready- 
to-load  and  error-free.  It  saves  you 
valuable  hours  of  typing  time  and  elimi- 
nates typing  errors. 

With  a  subscription,  you  will  receive 
one  disk  every  three  months  for  a  total 
of  four  disks  a  year— for  only  $39.95. 
That  saves  you  $20  a  year  off  the  single- 
issue  cost. 

Or  you  can  order  individual  issues 
of  the  Disk  for  $12.95  a  disk  plus  $2.00 
shipping  and  handling. 


Remember  to  specify  your  type  of 
computer  when  ordering  the  COMPUTE! 
Disk.  You'll  find  more  information  about 
this  month's  COMPUTE!  Disk  in  this 
issue.  (Note:  You'll  need  the  correspond- 
ing issues  of  COMPUTE!  magazine  to  use 
the  Disk  since  the  disk  will  have  no 
documentation.) 

For  fastest  service  when  ordering  a 
subscription  to  the  COMPUTE!  Disk,  call 
toll  free  1-800-247-5470  (in  Iowa 
1-800-532-1272). 

For  more  details  or  to  order  individ- 
ual issues  of  the  COMPUTE!  Disk,  call 
our  Customer  Service  Department  toll 
free  at  1-800-346-6767  (in  New  York 
212-887-8525). 

Please  allow  4-6  weeks  after  placing  an 
order  for  your  first  disk  to  arrive. 

COMPUTE!  Publicationsjnc^ 
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Adding  System  Power  To 

ST  BASIC 

Part  2 


Kevin  Mykytyn,  Editorial  Programmer 


The  VDISYS  command  lets  you  fill  in 

the  gaps  in  Atari  ST  BASIC  by  callit^g 
system  routines  to  do  jobs  that  would 
otherwise  be  impossible.  Part  1  of  this 
series  explained  the  fundamentals  of 
VDISYS  and  examined  a  general- 
purpose  drawing  routine.  This  part 
shows  how  VDISYS  can  perform  two 
other  important  tasks — reading  the 
screen  position  of  the  mouse  poijiter 
and  sensing  the  status  of  the  mouse 
buttons.  An  example  program  lets  you 
create  a  custom  shape  for  your  ST's 
mouse  pointer. 


Have  you  ever  tried  to  read  the 
Atari  ST's  mouse  controller  from 
BASIC?  If  you  have,  you  already 
know  that  BASIC  lacks  commands 
to  read  the  mouse  position  or  but- 
ton status.  Like  certain  other  tasks, 
mouse  reading  can  be  done  from 
BASIC  only  with  the  aid  of 
VDISYS,  Once  you  know  how  to 
read  the  mouse,  you  may  also  want 
to  change  the  mouse  pointer's  ap- 
pearance. This  article  explains  how 
to  do  both. 

Before  you  type  in  the  example 
program  below,  here  are  some  tips 
that  make  it  easier  to  enter  ST 
BASIC  programs.  First,  although  it 
may  be  obvious  to  some  of  you,  it  is 
far  easier  to  enter  a  program  from 
the  Edit  window  than  the  Com- 


mand window.  (To  move  to  the 
Edit  window,  type  EDIT  at  the 
Command  window's  OK  prompt  or 
choose  the  Start  Edit  option  from 
the  Edit  menu.)  The  Edit  window's 
full-screen  editor  is  much  more 
convenient  for  entering  program 
lines  than  the  Command  window's 
single-line  interface.  You  can  also 
run  a  program  directly  from  the 
Edit  window  (type  RUN  or  choose 
the  Start  option  from  the  Run 
menu).  When  the  program  is  fin- 
ished, control  returns  to  the  Edit 
window,  so  you  can  immediately 
modify  or  add  new  lines  to  the 
program. 

The  Edit  window  has  one  fea- 
ture that  you  may  or  may  not  ap- 
preciate. Until  you  press  RETURN, 
the  line  you're  working  on  appears 
in  ghost  mode  (the  letters  look  gray 
and  fuzzy).  The  purpose  of  ghost 
mode  is  to  show  which  lines  you 
have  changed.  That's  helpful  to  in- 
experienced programmers,  but  an 
annoyance  in  many  cases,  since 
ghosted  letters  are  harder  to  read 
than  normal  ones.  To  disable  ghost 
mode,  enter  this  line  in  the  Com- 
mand window: 
POKE  SYSTAB -1-2,0 

Another  way  to  ease  the  task  of 
program  entry  is  to  increase  the 
speed  of  the  cursor.  This  is  done 
from  the  Control  Panel.  The  second 
slider  from  the  top  (the  one  with  a 


rabbit  and  a  turtle)  controls  the  cur- 
sor speed.  To  increase  the  speed, 
click  on  the  slider  and  drag  it  to  the 
left  (toward  the  rabbit).  To  slow  it 
down,  drag  the  slider  to  the  right. 
You  can  also  turn  the  keyboard 
beeping  sound  off  and  on  by  click- 
ing the  C  key  icon  in  the  Control 
Panel. 

Redesigning  The  Pointer 

Two  more  steps  are  required  before 
typing  in  the  pointer-editing  pro- 
gram. First,  set  the  computer  to  me- 
dium resolution  (use  the  Set 
Preferences  option).  Second,  turn 
off  buffered  graphics  from  BASIC'S 
Run  menu.  If  your  ST  has  more 
than  512K  of  Random  Access  Mem- 
ory (RAM)  or  the  TOS  operating 
system  in  Read  Only  Memory 
(ROM),  the  second  step  may  or  may 
not  be  necessary,  but  it  can't  hurt  in 
any  case. 

Now  enter  Program  1  and  save 
it  to  disk.  It  lets  you  change  the 
mouse  pointer  from  the  familiar  ar- 
row shape  to  a  custom  design  of 
your  own.  When  you  run  the  pro- 
gram, a  grid  appears  on  the  left  side 
of  the  screen,  and  the  word  DONE 
is  shown  on  the  right.  To  edit  the 
pointer  shape,  move  the  mouse 
pointer  into  the  grid,  then  click  the 
button  on  any  square  you  want  to 
change.  Clicking  on  a  square  tog- 
gles it  on  or  off — if  the  square  is  on 
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(dark)  when  you  click,  it  is  turned 
off  (erased)  and  vice  versa, 

Once  you're  satisfied  with  the 
new  pointer,  move  the  n\ouse  out 
of  the  grid  and  click  on  the  word 
DONE.  The  program  then  asks  for 
the  location  of  the  new  pointer's  hot 
spot — a  single  dot  that  the  com- 
puter uses  to  tell  exactly  what  the 
pointer  is  pointing  at.  On  the  nor- 
mal mouse  pointer,  the  hot  spot  is 
located  at  the  very  tip  of  the  arrow. 
But  you  can  place  it  anywhere  with- 
in your  custom  pointer  shape. 

After  you  locate  the  hot  spot, 
the  new  pointer  appears  on  the 
screen.  At  this  point,  the  program 
asks  whether  you  want  to  save  the 
pointer  shape  data  to  a  disk  file  for 
later  use.  If  so,  press  Y  and  enter  a 
filename  when  prompted.  If  you 
press  any  other  key,  the  program 
ends  without  saving  the  shape.  Pro- 
gram 2  (see  below)  provides  a 
method  for  reloading  the  shape 
data  from  the  disk  file  and  making 
the  custom  pointer  appear  in  a 
BASIC  program  of  your  own. 

Reading  The  ST's  Mouse 

If  you're  unfamiliar  v«th  the  usage 
of  VDISYS,  CONTRL,  and  PTSIN, 
you  may  want  to  read  Part  1  of  this 
article  (April  COMPUTE!)  before  go- 
ing any  further.  It  explains  the  fun- 
damentals of  calling  VDI  routines 
from  ST  BASIC. 

As  mentioned  earlier,  ST 
BASIC  has  no  commands  to  read 
the  mouse  or  the  state  of  the  mouse 
buttons  directly.  Fortunately,  there 
is  a  VDI  routine  (appropriately 
named  Readmouse)  which  gives 
this  information.  Only  three  steps 
are  needed  to  call  this  routine. 
Since  Readmouse  has  an  opcode  of 
124,  we  first  execute  POKE 
CONTRL,124  to  tell  the  ST  which 
VDI  routine  to  call  (line  90  in  Pro- 
gram 1).  This  routine  doesn't  in- 
volve any  vertices  or  attributes,  so 
CONTRL +  2  and  CONTRL +6  are 
POKEd  with  zeros.  Once  that  brief 
preparation  is  complete,  the  state- 
ment VDISYS(O)  achjally  calls  the 
routine. 

As  you  may  recall.  Part  1  ex- 
plained how  to  pass  information 
from  BASIC  to  a  VDI  drawing  rou- 
tine. When  that  routine  was  done 
with  its  work  (drawing  a  graphic 
shape),  we  didn't  care  whether  it 
passed  any  information  back  in  the 


other  direction.  But  many  VDI  rou- 
tines pass  significant  information 
back  to  BASIC.  Thus,  calling  a  rou- 
tine like  Readmouse  involves  a 
two-way  information  transfer.  You 
must  supply  certain  data  before  call- 
ing the  routine;  and  when  it  returns 
control  to  BASIC,  the  routine  sends 
other  information  back  to  you. 

Part  1  also  explained  how  the 
parameter  blocks  named  PTSIN 
and  INTIN  are  used  to  pass  data 
from  BASIC  to  a  VDI  routine.  These 
parameter  blocks  are  paralleled  by 
PTSOUT  and  INTOUT,  which  per- 
form the  same  operations  in 
reverse.  Though  they're  considered 
reserved  variables  (which  you  can 
use  only  in  certain,  predefined 
ways),  PTSOUT  and  INTOUT  each 
point  to  a  block  of  special  storage 
locations  in  memory  called  a  pa- 
rameter block.  Like  PTSIN, 
PTSOUT  points  to  a  temporary 
holding  area  for  information  about 
X  and  y  position  coordinates.  Like 
the  INTIN  parameter  block,  INT- 
OUT defines  the  area  where  other 
information  (attribute  data,  etc.)  is 
passed. 

Position  And  Button  Status 

To  read  the  mouse  pointer's  screen 
location,  call  the  Readmouse  rou- 
tine and  PEEK  the  memory  loca- 
tions defined  by  PTSOUT  and 
PTSOUT -I- 2.  In  Program  1,  this  is 
done  at  line  110.  The  statement 
X=PEEK(PTSOUT)  transfers  the 
value  stored  in  PTSOUT  in  the  vari- 
able X,  representing  the  mouse 
pointer's  horizontal  position.  Simi- 
larly, Y  =  PEEK(PT50UT-h2) 
makes  y  equal  to  the  mouse  point- 
er's vertical  position. 


To  read  the  status  of  the  mouse 
buttons,  call  the  Readmouse  rou- 
tine and  PEEK  the  locations  defined 
by  INTOUT  and  INTOUT -F  2.  INT- 
OUT returns  information  about  the 
left  button,  and  INTOUT+2  tells 
you  the  status  of  the  right  button.  If 
a  button  is  pressed,  the  value  in  the 
corresponding  location  is  1;  if  it's 
not  pressed,  the  value  is  0.  Program 
1  reads  both  mouse  buttons  at  line 
120.  When  the  left  button  is 
pressed,  the  variable  LBUTTON  is 
set  to  1;  when  the  right  button  is 
pressed,  the  variable  RBUTTON  is 
set  to  1.  Table  1  outlines  the  infor- 
mation you  need  to  use  Readmouse. 

Customizing  Ttie  Pointer 

Though  the  ST's  familiar  arrow 
pointer  may  be  suitable  most  of  the 
time,  occasionally  you  might  want 
it  to  look  like  something  else.  In  a 
drawing  program,  for  instance,  why 
not  reshape  the  pointer  as  a  pencil 
or  a  paintbrush?  Once  you  know 
how  to  modify  the  pointer's  ap- 
pearance, you  can  make  it  look  like 
a  pointing  hand,  a  musical  note,  a 
scientific  symbol,  or  whatever  else 
is  needed  to  give  your  program  that 
unique,  customized  look. 

The  VDI  routine  that  redraws 
the  mouse  pointer  is  called  Set 
Mouse  Form,  usually  abbreviated 
as  SMF.  Because  the  SMF  routine 
requires  a  lot  of  information,  its  set- 
up procedure  is  fairly  complex.  The 
first  step,  as  always,  is  to  POKE  the 
opcode  for  the  VDI  routine  into 
CONTRL.  Since  the  opcode  for 
SMF  is  111,  Program  1  performs 
POKE  CONTRL,lll  at  line  210. 
Next,  you  must  POKE  the  number 


Tabte  1:  Readmouse  Parameters 


Input  Parameters 

POKE  CONTRL,  124 

POKE  CONTRL -1-2,0 

POKE  CONTRL -I- 6,0 

Output  Faxameters 

PEEK(PTSOUT) 

PEEK(PT50UT-l-2) 

PEEK(INTOUT) 

PEEK(INTOUT-l-2) 


(opcode) 
(number  of 

vertices) 
(number  of 

attributes) 


(horizontal  mouse 

position) 
(vertical  mouse 

position) 
(1  =  left  button 

pressed) 
(1  =  right  button 

pressed) 
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of  vertices  (0  in  this  case)  and  the 
number  of  attributes  (37)  into 
CONTRL+2  and  CONTRL+6 
(lines  210-220). 

The  mouse  pointer  can  move 
anywhere  on  the  screen,  so  there's 
no  need  to  provide  x  and  y  coordi- 
nates for  the  shape  as  a  whole. 
However,  you  must  tell  the  system 
where,  within  that  shape,  it  should 
put  the  hot  spot.  The  hot  spot's 
coordinates  are  defined  relative  to 
the  upper-left  comer  of  the  new 
pointer  shape.  POKE  the  x  coordi- 
nate value  in  INTIN  and  the  y  coor- 
dinate in  INTIN -1-2.  At  the  same 
time,  you  should  also  POKE  a  1  into 
INTIN -1-4  (lines  220-230). 

Who  Was  That 
Masked  Mouse? 

The  mouse  pointer  you  see  on  the 
screen  is  actually  made  of  two  sepa- 
rate parts — the  pointer  shape  itself 
and  a  second  shape  called  a  mask. 
Both  forms  are  the  same  size  (16 
pixels  high  and  16  pixels  wide)  and 
appear  at  the  same  place  on  the 
screen.  Since  the  pointer  and  the 
mask  can  be  different  colors,  this 
permits  you  to  make  a  two-color 
mouse  pointer.  To  create  the  illu- 
sion of  solidity,  for  instance,  you 
might  draw  the  main  body  of  the 
pointer  in  one  color  and  add  a  dark- 
er shadow  along  its  lower  edges.  To 
set  the  mask's  color,  POKE  the  de- 
sired color  number  into  location 
INTIN -h 6.  POKE  the  pointer's 
color  into  INTIN -h  8. 

After  you've  defined  the  col- 
ors, you  must  supply  shape  infor- 
mation for  both  the  pointer  and  the 
mask.  Each  shape  requires  32  bytes 
(16  words)  of  data.  The  figure  be- 


low illustrates  how  the  16  words  of 
shape  data  go  together  to  make  up 
the  entire  shape. 
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Mouse  Pointer  Data 

If  you  visualize  the  pointer 
shape  within  a  16  X  16  grid,  the 
first  16-bit  data  word  is  in  the  top 
row  of  the  grid,  the  second  data 
word  represents  the  second  row, 
and  so  on.  To  pass  the  shape  infor- 
mation to  the  SMF  routine,  you 
must  first  calculate  the  16-bit  val- 
ues represented  by  the  "on"  bits 
within  this  grid.  When  that's  done, 
the  data  for  the  mask  is  POKEd  into 
locations  INTIN -f  10,  INTIN -HI  2 
...  INTIN -I- 40.  The  pointer  shape 
data  is  POKEd  into  locations 
INTIN -h  42  through  INTIN -1-72, 
Don't  be  concerned  if  that  sounds  a 
bit  confusing.  Program  1  does  all 
the  calculations  and  POKEs  for  you 
automatically.  For  those  who  are 
interested,  Table  2  outlines  the 
information  needed  by  the  SMF 
routine. 


Table  2:  Set  Mouse  Form  (SMF)  Parameters 


Input  Faramefers 

POKECONTRUlll      (opcode) 

POKE  CONTRL-I-  2,0    (number  of  input  vertices) 

POKE  CONTRL+6,37  (number  of  attributes) 

POKE  INTIN.X  (X"hot  spot  horizontal  coordinate) 

POKE  INTJN  +  2,Y        (Y=hot  spot  vertical  coordinate) 

POKE  INTIN +  6,mask  color 

POKE  INTIN +  8,pointer  color 

POKE  INTlN-H10-INTIN-l-40,mask  shape  data 

POKE  INTIN-h42-INTIN-l-72,pointer  shape  data 


Saving  Custom  Pointers 

Once  you've  created  a  custom 
pointer  with  Program  1,  it  appears 
on  the  screen  and  works  just  like 
the  normal  one.  However,  the 
pointer  reverts  to  its  usual  shape  as 
soon  as  you  exit  BASIC. 

To  help  you  incorporate  cus- 
tom pointers  in  your  own  BASIC 
programs.  Program  1  lets  you  save 
all  the  pointer  shape  data  in  a  disk 
file.  Program  2  illustrates  how  to 
read  the  shape  data  from  the  disk 
file  and  recreate  the  custom  pointer 
in  another  program. 

The  first  two  data  items  in  the 
disk  file  are  x  and  y  coordinates  for 
the  pointer's  hot  spot.  The  next  16 
data  items  are  the  16  words  (32 
bytes)  of  shape  data  for  the  pointer 
and  mask  forms.  After  this  data  has 
been  retrieved,  it's  simply  a  matter 
of  performing  the  setup  and  calling 
the  SMF  routine  just  as  we  did  in 
Program  1. 

To  incorporate  this  routine  in 
your  own  program,  replace  the  IN- 
PUT statement  in  line  10  with 
FN$  =  "FILENAME"  using  your 
own  filename  in  place  of  FILE- 
NAME. Of  course,  you  could  also 
convert  the  shape  data  into  DATA 
statements  contained  in  the  pro- 
gram itself. 
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Thh  drawing  grid  (created  by  Program 
J)  lets  you  create  custom  jiwuse  pointers 
for  use  in  your  own  ST  BASIC  programs. 

Program  1 :  ST  Mouse 
Pointer  Editor 

10  FULLW  2;CLEARW  2:COLOR  1,1,1,1 
20  DIM  AR(16,16),SHAPE(30):FOR  A  = 

1  TO  16:FOR  B  =  l  TO  16:AR(A,B)  =  0: 

NEXT  B,A 
30  FOR  A  =  50  TO  306  STEP  16:LINEF  A, 

20,A,148:NEXT 
40  FOR  A  =  20  TO  148  STEP  8:LINEF  50, 

A,306,A:NEXT 
50  GOTOXY  48,8:PRINT  "DONE":Q=43 

0:R  =  72:LINEFQ,R,Q  +  36,RrLINEFQ  + 

36,R,Q  +  36,R  +  10 
60  LINEF  Q-(-36,R^10,Q,R  +  10:L[NEF  Q, 
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70  GOSUB  READMOUSE:IF  LBUTTON 
=  TOGGLE  THEN  70  ELSE  TOGGLE 
= LBUTTON 
80  IF  LBUTTON  THEN  GOSUB  FLIP:GO 

TO  70  ELSE  GOTO  70 
90  READMOUSE:  POKE  CONTRL,124 
100  POKE  CONTRL  +  2,0:POKE  CONTR 

L  +  6,0:VDISYS  (0) 
110  X  =  PEEK(PTSOUT):Y=PEEK(PTSOU 

T  +  2) 
120  LBUTTON -PEEK(INTOUT):RBUTT 

ON=PEEK0NTOUT+2) 
130  RETURN 

140  FLIP;  GOSUB  LOCATE 
ISO  IF  XP>24  AND  XP<27  AND  YP  = 

8  THEN  GOTO  DEFINEIT 
160  IF  XP<1  OR  XP>16  OR  YP<1  OR  YP 

>16  THEN  RETURN 
170  IF  AR(XP,YP)  THEN  AR(XP,YP)  =  0;C 

OLOR  1,0:GOTO  190 
180  AR(XP,YF)  =  1;COLOR  1,2 
190  FILL  XP*16  +  44,YP*8+18:RETURN 
200  DEFINEIT:  GOTOXY  43,12:PRINT  " 

CHOOSE  HOT  SFOT":GOSUB  HOT 

SPOT 
210  POKE  CONTRL,lll:POKE  CONTRL 

+  2,0 
220  POKE  CONTRL +  6,37:HX=XP:HY  = 

YP 
230  POKE  INTIN,XP-l:FOKE  INTIN  +  2, 

YP-l:POKE  INTIN+4,1 
240  POKE  INTIN  +  6,0:POKE  INTIN  +  8,1 
250  FOR  A  =  10  TO  40  STEP  2;T  =  0 
260  FOR  B  =  16  TO  1  STEP-1:T  =  T-2*(1 

6-BC(AR(B,  A/2-4)  =  1>;NEXT 
270  POKE  INTIN  +  A,T:POKE  INTIN+A 

+  32,T:SH  APE((a-10)/2)  -=  t 
280  NEXT:VDISYS  (0):CLEARW  2:GOTO 

XY  32,0:PRINT  "DEFINED" 
290  PRINT  "Do  you  want  to  save  this  sh 

aper':A  =  INP(2):IF  A<>121  THE 

NEND 
300  INPUT  "FiIenaine";FN$:OPEN  "0",# 

1,FN$:PRINT  #1,HX;HY 
310  FOR  A  =  0  TO  ISrPRINT  #1,SHAPE( 

A):NEXT:CLOSE  #1:END 
320  HOTSPOTr  GOSUB  READMOUSE:! 

F  LBUTTON  =  TOGGLE  THEN  32 

0  ELSE  TOGGLE =LBUTTON 
330  IF  LBUTTON  =  0  THEN  320 
340  GOSUB  LOCATE:IF  XP<1  OR  XP>1 

6  OR  YP<1  OR  YP>16  THEN  340  EL 

SE  RETURN 
350  LOCATE:  XP  =  INT((X-50)/16)  +  l:YP 

=  INT((Y-40)/8)  +  1:RETURN 

Program  2:  Pointer  Loader 

10  DIM  SHAPE(30):CLEARW  2:GOTOX 

Y  0,0;INPUT  'Tilenaine";FN$:OPEN  "I 

20  INPUT  #l,HX,HY:FOR  A  =  0  TO  15:IN 

PUT  #1,SHAPE(A);NEXT 
30  POKE  CONTRL,lll:POKE  CONTRL 

+  2,0 
40  POKE  CONTRL +  6,37 
50  POKE  INTIN,HX-l:POKE  INTIN  +  2,H 

Y-l:POKE  INTIN+4,1 
60  POKE  INTIN  +  6,0:POKE  INTIN  +  8,1 
70  FOR  A  =  10  TO  40  STEP  2;T  =  SHAPE( 

(A-10)/2) 
80  POKE  INTIN  +  A,T:POKE  INTIN  +  A 

+  32,T 
90  NEXT:VDISYS  (0):CLEARW  2:GOTOX 

Y  0,0:PRINT  "Defined"  © 


Using 

PALETTE  USING 

On  The  PCjr 


John  And  Jeff  Klein 


The  IBM  PCjr's  PALETTE  USING 
command  lets  you  quickly  change  all 
screen  attributes  and  colors  in  any 
graphics  mode  for  a  variety  of  effects. 
This  article  explains  the  details  of 
PALETTE  USING  and  demonstrates 
its  usefulness  with  programming  ex- 
amples. An  IBM  PCjr  with  Cartridge 
BASIC  is  required. 


Though  Cartridge  BASIC  for  the 
PCjr  is  very  similar  to  BASICA  for 
the  IBM  PC,  the  PCjr  has  extra 
graphics  capabilities  which  the  PC 
does  not  enjoy.  One  of  these  in- 
volves the  PALETTE  and  PALETTE 
USING  commands,  which  control 
color  attributes.  Before  you  can  use 
PALETTE  USING,  you  need  to 
know  how  the  simpler  PALETTE 
statement  works. 

The  PCjr  offers  16  different 
colors,  numbered  from  0-15.  An 
attribute  is  a  number  associated 
with  a  particular  color.  To  explain 
what  an  attribute  actually  does, 
let's  look  briefly  at  the  PCjr's  color 
management  scheme. 

When  you  turn  on  the  PCjr, 
there's  a  simple,  one-to-one  rela- 
tionship between  colors  and  attri- 
butes. Attribute  number  1 
corresponds  to  color  number  1 
(blue),  attribute  2  corresponds  to 


color  2  (green),  and  so  on.  Table  1 
shows  this  initial  arrangement. 


Table  1:  Default  PCjr 
Attributes 


Color 
Number 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 
10 
11 
12 
13 
14 
15 


Atfrfbule      Visual 
Color 


0 

I 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 


black 

blue 

green 

cyan 

red 

magenta 

brown 

white 

gray 

light  blue 

light  green 

light  cyan 

Ught  red 

hght  magenta 

yellow 

high-intensity 

white 


The  PALETTE  command  lets 
you  change  this  arrangement  by  as- 
signing a  different  color  to  any  sin- 
gle attribute.  Here's  the  general 
form  of  the  PALETTE  statement; 
PALETTE  attribute,  color 

Attribute  tells  the  computer 
which  attribute  you're  working 
with,   and   color  indicates   which 
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Figure  1 :  PAL  Integer  Array 

(1)    (2)    (3)    (4)    (5)   (6)    (7)   (8)    (9)   (10) 
0404040404 


(11)  (12)  (13)  (14)  (15)  (16) 
0       4       0       4       0       4 


color  you  want  to  assign  to  that 
attribute.  To  take  a  simple  example, 
say  that  you  turn  on  the  computer 
and  draw  some  shapes  in  blue 
(color  1).  This  statement  changes 
every  blue  object  on  the  screen  to 
red: 

PALETTE  1,4 

In  this  example,  the  1  refers  to 
attribute  1,  and  the  4  refers  to  color 
4  (red).  Before  the  statement  exe- 
cutes, attribute  1  is  assigned  to  color 
1  (blue),  the  normal  arrangement. 
After  it  executes,  attribute  1  is  reas- 
signed so  that  it  equals  red.  In  an 
eyeblink,  every  blue  object  turns 
red.  Likewise,  the  statement  PAL- 
ETTE 0,7  changes  every  shape 
that's  initially  black  (color  0)  to 
white  (color  7).  By  performing  a 
series  of  16  PALETTE  statements 
(FOR  J  =  0  TO  15:  PALETTE  J,4: 
NEXT),  you  could  change  every- 
thing on  the  screen  to  red,  regard- 
less of  its  initial  color. 

In  other  words,  PALETTE 
makes  it  possible  to  "rewire"  the 
normal  color  scheme  whenever  you 
like.  An  object  that  starts  out  green 
can  be  changed  to  magenta;  shapes 
that  first  appear  in  gray  can  be 
switched  immediately  to  yellow, 
and  so  forth.  If  PALETTE  were  not 
available,  such  effects  would  be 
much  more  difficult  and  time- 
consuming;  whenever  you  wanted 
a  massive  color  change,  you'd  have 
to  redraw  every  object  of  a  given 
color  in  its  new  color. 

After  performing  a  number  of 
PALETTE  statements,  you  may 
want  to  restore  the  original  color/ 
attribute  scheme.  This  can  be  done 
in  two  different  ways,  either  by 
changing  the  screen  mode,  or  by 
executing  a  PALETTE  statement 
with  no  parameters  (the  keyword 
PALETTE  followed  by  nothing). 

USING  A  Shortcut 

One  disadvantage  of  PALETTE  is 
that  it  affects  only  one  attribute  at  a 
time.  The  more  attributes  you  want 
to  change,  the  more  PALETTE 
statements   you    must   perform. 


Table  2:  Attributes  After 
PALETTE  USING  PAL(l) 


Attribute 


15 


Array  element 

linked  with 

attribute 

PAL(l) 
PAL(2) 
PAL(3) 
PAL(4) 


PAL(16) 


New 
color 

0 
4 
0 
4 


That's  where  PALETTE  USING  en- 
ters the  picture.  This  special  form  of 
PALETTE  can  change  all  16  attri- 
butes at  once,  assigning  them  to  a 
set  of  16  color  values  which  are 
stored  in  an  integer  array.  Here's 
the  general  format  of  the  command: 

PALETTE  USING  arraynameistarting 
position) 

Arrayname  identifies  the  array 
you  want  to  use,  and  starting  posi- 
tion tells  the  computer  which  array 
element  belongs  to  attribute  0.  The 
array  can  have  any  legal  IBM  array 
name,  but  it  must  be  in  existence 
before  you  execute  PALETTE 
USING. 

For  example,  let's  say  that  you 
create  an  integer  array  named  PAL 
with  the  contents  shown  in  Figure  1 
(array  element  1  contains  a  zero 


value,  element  2  contains  the  value 
4,  and  so  on). 

Now  assume  that  you  execute 
the  following  statement: 
PALETTE  USING  PAL(l) 

This  single  PALETTE  USING  com- 
mand has  the  effect  of  reassigning 
all  16  attributes  in  one  stroke.  Table 
2  shows  the  new  color/ attribute 
scheme  which  takes  effect. 

After  a  PALETTE  USING,  the 
values  in  the  array  replace  the  color 
numbers  originally  associated  with 
each  attribute.  In  this  example,  at- 
tribute 0  is  still  assigned  to  black 
(color  0),  and  attribute  4  is  still  as- 
signed to  red  (4),  but  all  the  other 
odd  attributes  become  black  and  all 
the  even  ones  are  changed  to  red. 
Since  we  specified  a  starting  posi- 
tion of  1,  the  contents  of  array  ele- 
ment 1  replace  the  color  number  for 
attribute  1;  the  other  values  follow 
in  ascending  numeric  order. 

In  some  cases,  you  may  want 
to  change  some,  but  not  all,  of  the 
16  attributes  with  PALETTE  USING. 
To  retain  the  current  color  for  a 
given  attribute,  make  the  corre- 
sponding array  element  equal  to 
—  1.  For  instance,  if  element  PAL(2) 
equals  —  lin  the  previous  example, 
then  attribute  1  retains  its  original 
color  (blue),  while  the  other  15  at- 
tributes are  changed  to  black  and 
red  in  even-odd  order.  Thus,  the 
values  you  store  in  the  integer  array 
are  limited  to  the  range  —1  to  15. 
The  value  —1  represents  no 
change;  values  from  0-15  represent 
the  colors  shown  in  Table  1. 

An  interesting  feature  of  PAL- 
ETTE USING  is  its  ability  to  start 


Figure  2:  Numeric  Display  Simulation 

Second  digit  First  digit 

5  12 


11 


10 
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anywhere  in  the  array  and  begin 
changing  attributes  from  that  par- 
ticular point  (rather  than  always 
starting  at  the  first  array  element). 
For  instance,  say  that  you  have  100 
different  16-color  patterns  stored  in 
a  single  integer  array  (with  a  total  of 
1600  elen^ents).  To  cycle  through 
100'  different  configurations,  you 
need  orJy  execute  a  series  of  PAL- 
ETTE USING  statements,  changing 
the  starting  position  with  each  new 
command.  The  first  statement 
could  use  a  starting  position  of  1, 
the  next  a  starting  position  of  17, 
and  so  forth. 

Digital  Countdown 

Once  you  learn  about  PALETTE 
USING,  many  different  effects 
come  to  mind.  Program  1  demon- 
strates just  one  possibility,  simulat- 
ing the  seven-segment  numeric 
display  seen  on  most  electronic  cal- 
culators and  watches.  Of  course, 
calculators  and  watches  create  their 
displays  with  very  different  meth- 
ods, but  they  still  form  the  numer- 
als 0-9  by  turning  various  line 
segments  on  or  off,  just  as  we'll  do 
here.  Program  1  creates  the  line 
segments  with  the  attributes  shown 
in  Figure  2  (note  that  attributes  0 
and  15  are  not  used). 

Line  20  creates  the  integer 
variable  PAL,  and  line  50  READs 
the  DATA  values  from  lines 
1000-1090  into  the  array.  When 
that's  done,  the  array  contains  all 
the  patterns  we'll  need  to  form  the 
digits  0-9.  To  display  a  new  digit, 
we  simply  choose  a  different  start- 
ing point  for  the  next  PALETTE 
USING  command.  As  written,  the 
program  simply  counts  off  seconds, 
but  with  a  little  additional  program- 
ming, you  can  use  it  as  a  general 
routine  to  count  any  two-digit  val- 
ues. Lines  110-120  do  the  actual 
calculation  based  on  the  value  of  X, 
which  can  be  any  number  from 
0-99  inclusive. 

Color  Cycling 

Program  2  shows  how  to  create  ani- 
mated effects  by  cycling  colors  with 
PALETTE  USING.  When  you  run 
the  program,  it  asks  whether  you 
want  to  draw  squares,  circles,  ellip- 
ses, or  random  shapes,  and  wheth- 
er you  want  the  figures  to  be  filled 
or  empty  (the  fill  option  cannot  be 
used  with  squares).  When  all  the 
shapes  are  drawn,  they'll  seem  to 


»ni  s*iU   hies 


SIGN  : 


The  IBM  PCjr's  PALETTE  USING  state- 
ment simplifies  color  control  for  graphic 
displays. 

begin  moving  in  a  complex,  tunnel- 
like effect.  Though  the  figures  ap- 
pear to  move  in  and  out,  the  effect 
is  entirely  illusory.  In  fact,  we're 
simply  cycling  through  a  pattern 
that  includes  the  background  color 
(black  in  this  case).  When  a  shape  is 
colored  the  same  as  the  back- 
ground, it  seems  to  disappear. 

This  type  of  animation  is  fairly 
simple  to  create,  provided  that  you 
begin  with  a  clear  mental  picture  of 
the  final  result.  For  complicated 
pictures,  you  may  want  to  sketch 
the  various  shapes  on  paper  before- 
hand, or  use  "The  Screen  Ma- 
chine," a  graphics-design  program 
published  in  the  April  1984  issue  of 
COMPUTEI's  PC  and  PCjr  maga- 
zine. Since  one  color  must  be  re- 
served to  match  the  background, 
you're  limited  to  15  different  colors 
for  visible  shapes.  Changing  the 
color  associated  with  the  back- 
ground attribute  also  changes  the 
border  color,  so  it's  often  a  good 
idea  not  to  change  attribute  0. 

Program  3  employs  similar 
techniques  to  create  a  colorful  ani- 
mated sign.  In  this  case,  only  eight 
attributes  are  affected,  leaving  eight 
others  free  for  additional  effects. 

These  short  examples  barely 
scratch  the  surface  of  PALETTE 
USING.  Once  you  learn  the  basics 
of  this  powerful  command,  you'll 
probably  find  yourself  using  it  more 
and  more  often. 


For  instnjctions  on  entering  these  listings, 
please  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Programs"  in  this  issue  of  computei. 

Program  1:  Digital 
Countdown 

PJ  10  *  Program  #1  -  Simulates  t 
WD  seven  segment  displays 


"Tunnel  Vision"  for  the  IBM  PCjr 
creates  a  convincing  3-D  effect  with 
PALETTE  USING  commands. 


IE  20  CLEAR,,, 32768!: KEY  OFF: SCR 

EEN  5:CLB:DEFINT  P:DIM  PAL 

(245): SOUND  ON 
PJ  30  C=0:X1=60:GQSUB  2000 
AB  40  C=l:  X  1  =  150:  6QSUB  2000 
EO  50  FDR  1=0   TO  245: READ  PAL(Z) 

:NEXT 
BB  60  X=0:  PALETTE  USINB  PAL  (230) 

: TIMER  ON: ON  TIMER (1>  BQSU 

B  100 
JO  70  GOTD  70 

PA  100  X=X+1:IF  X=60  THEN  X=0 
LZ   110  Y=X-(INT  (X/'10>«10):PALETT 
E  USIN8  PAL (V«23): SOUND  3 
000, .5,15,0 


EH  120  Y=INT(X/ 10):  PALETTE  US 
PAL ( Yt23+7) : RETURN 


-1 


-1 


-1 


-1 


JN  1000  DATA  -1,-1,-1,-1,- 
1,-1,6,6,6,6,6,0,6 
,-1,-1,-1,-1,-1,-1 

HE  1010  DATA  -1,-1,-1,-1,- 
1,-1,0,0,6,6,0,0,0 
,-1,-1,-1,-1,-1,-1 

OF  1020  DATA  -1,-1,-1,-1,- 
1,-1,0,6,0,6,  6,6,6 
,-1,-1,-1,-1,-1,-1 

P£  1030  DATA  -1,-1,-1,-1,- 
1,-1,0,0,6,6,6,6,6 
,-1,-1,-1,-1,-1,-1 

L»  1040  DATA  -1,-1,-1,-1,- 
1,-1,6,0,6,6,0,6,0 
,-1,-1,-1,-1,-1,-1 

KB  1050  DATA  -1,-1,-1,-1,- 
1,-1,6,0,6,0,6,6,6 
,-1,-1,-1,-1,-1,-1 

LH  1060  DATA  -1,-1,-1,-1,- 
1,-1,6,6,6,0,6,6,6 
,-1,-1,-1,-1,-1,-1 

0(  1070  DATA  -1,-1,-1,-1,- 
1,-1,0,0,6,6,6,0,0 
,-1,-1,-1,-1,-1,-1 

LD  1080  DATA  -1,-1,-1,-1,- 
1,-1,6,6,6,6,6,6,6 
,-1,-1,-1,-1,-1,-1 

01  1090  DATA  -1,-1,-1,-1,- 
1,-1,6,0,6,6,6,6,6 
,-1,-1,-1,-1,-1,-1 

BD  1100  DATA  0,0,0,0,0,0,0,0,0,0 
,0,0,0,0,0,0 

PD  2000  LINE  (X1,30)-(X1+20,1003 
,C»7+1,BF 

F6  2010  LINE  (XI,  101)-(X1+20,170 
) ,C«7+2,BF 

A6  2020  LINE  (X  1+60,  101 )-(  X1  +  B0, 
170) ,C*7+3,BF 

£E  2030  LINE  (  Xl+60,  30)  -  (Xl+80,  1 
00) ,C»7+4,BF 

LE  2040  Y=0:X=0:FOR  Z=l  TO  16 

6K  2050  LINE  (Xl+X,30+Y)-(Xl+79- 
X,30+Y) ,C«7+5 

P6  2060  LINE  (Xl+X,  170-Y)-(Xl+7'? 
-X, 170-Y) ,Ct7+7 


NB 
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II    2070    Y=Y+1:X  =  X  +  1.3:NEXT 

Bfl   2080    Y=0:X=0:FDR    Z=l    TD    9 

Lll   2090    LINE     (Xl+X,  l00+Y)-(Xl+7'7 

-X, 100-Y) ,C«7+6,BF 
3i  2100    Y=Y+1;X=X+2.4:NEXT:RETUR 

N 

Program  2:  Tunnel  Vision 

SH  10  '  Program  #2  -  Tunnel  Anim 
atiqn 

IB  20  CLEAR,  ,  ,  32763  !  :  KEY  OFF:  SCR 
EEN  3: CL3: RANDOMIZE  TIMER 

CB  30  DEFINT  P:DIM  PAL  (479)  :  LDCA 
TE  10, 11: PRINT  "ONE  MOMENT 
PLEASE" 

KE  40  SPEED=30 

DI  50  FOR  1=0  TD  479:  READ  PAL(Z) 
:NEXT  2 

IB  60  CLS:  PALETTE:  LOCATE  3,14:PR 
INT  "MAIN  MENU": LOCATE  B, 1 
4:  PRINT  "U  SQUARES."  :  LOC  AT 
E  10,14:PRINT  "2)  CIRCLE": 
LOCATE  12,14:PRINT  "3)  ELL 
IPSE":LOCATE  14,14:PRINT  " 
4)  RANDOM  SHAPES": LOCATE  1 
7,14:PRINT  "CHOOSE  ONE" 

OS  70  A*=INPUT»(1)  :  IF  A«>"4"  OR 
A«<"1"  THEN  70 

OP  80  LOCATE  20,14:PRINT  "FILLED 
IN  !Y/N)  ?":flN»=INPUT$(l) 
:IF  AN»<>"N"  AND  AN«<>"n" 
AND  AN«<>"Y"  AND  AN«<>"y" 
THEN  80  ELSE  IF  AN*="y"  TH 
EN  AN«="Y"  ELSE  IF  AN«="n" 
THEN  AS$="N" 

m  90  CLS: ON  VAL (A*)  GOSUB  100,1 
30 , 1 60 , 1 90 : GOSUB  270 : GOTO 
60 

FJ  100  '  ««*  SQUARES  *** 

CF  110  FGR  z=lS0  TO  10  STEP  -\0: 
IF  AN*="N"  THEN  LINE  (160 
-Z, 100-Z/1,5>-(160+Z, 100+ 
Z/1.5>,Z/10,B  ELSE  LINE  ( 
160-Z,100-Z/1.5)-(160+Z,1 
00+Z/1.5) ,Z/10,BF 

NI  120  NEXT  Z:LINE  (157,9B)-C163 
,102) ,0,BF: RETURN 

K   130   '  »««  CIRCLES  ««« 

FP  140  FOR  Z=>150  TD  10  STEP  -10: 
CIRCLE  (160, 100) ,Z,Z/10s I 
F  AN*="Y"  THEN  PAINT "STEP 
(0,0)  ,Z/10,Z/'10 

6L  150  NEXT  Z:CIRCLE  (160,  100), 2 
,0:PAINT  STEP(0,0),0,0:RE 
TURN 

K    160  *'  »««  ELLIPSES  **t 

KB  170  FOR  Z=150  TO  10  STEP  -10: 
CIRCLE  (160, 100) ,Z,Z/10,  , 
,3/12: IF  AN*="Y"  THEN  PAI 
NT  STEP(0,0) ,Z/10,Z/10 

EJ  1B0  NEXT  Z:  RETURN 

EI  190  '  ***  RANDOM  SHAPES  «»* 

FK  200  FOR  Z=l  TO  15 

EB  210  ON  INT(RND»4+1)  GOSUB  230 
,240,250,260 

DO  220  NEXT  Z;  RETURN 

ON  230  LINE  (RND*320,RND*200)-(R 
ND*320,RNDt200)  ,  Z s RETURN 

IL  240  CIRCLE  (RND*320,  RND»200)  , 
RND«S0,Z:IF  AN*="Y"  THEN 
PAINT  STEP(0,0) ,Z,Z:RETUR 
N 

PF  250  CIRCLE  (RND*320,  RND«200)  , 
RNDt50,Z, , ,RND«2: IF  ANS=" 
Y"  THEN  PAINT  STEPt0,0),Z 
,Z: RETURN 

ME  260  IF  AN«="Y"  THEN  LINE  (RND 
»320, RND«200> - (RND*320, RN 
D»200),Z,BF: RETURN  ELSE  L 
I NE  ( RND*  320 , RND*  200 ) - ( RN 
D«320, RND*200) , Z , B: RETURN 


PF   270    ■     »*»    MAIN    *«* 

HH   280    FOR    Z  =  l    TO    30:  FOR    SL0W=1 

TO    SPEED: NEXT 
JB   290    PALETTE    USING    PAL((Z-1)»1 

6) 
Hft   300    A*=INKEY*:IF    A$<>""    THEN 

RETURN  ELSE  NEXT  Z:t30T0  2 

80 


nc 

1000 

DATA  -1 

-1 , 

-1, 

0, 

-1, 

5,- 

1,  0,-1 

-1, 

-1. 

-1, 

-1, 

-1, 

4,-1 

DO 

1010 

DATA  -1 

-1 , 

-1. 

-1, 

2,  1 

4,-1,-1 

-I, 

-1. 

-1, 

-1, 

4,- 

1,  0 

FP 

1020 

DATA  -1 

-1 , 

-1, 

1, 

-1, 

0,- 

1,14,-1 

-1, 

-1, 

-1, 

-1, 

0,-1 

KJ 

1030 

DATA  -1 

-1 , 

1, 

-1, 

-1, 

0,-1,14 

-1 , 

-1, 

4, 

-1 

0,- 

1,-1 

Pfl 

1040 

DATA  -1 

-1, 

0, 

-Ij 

-1,- 

1,  0,-1 

14' 

4, 

~1, 

-1,- 

1,-1 

PP 

1050 

DATA  -1 

,-1 

0 

-1 

-1 

-1,- 

1:-1,  0 

6 

0 

-1 

-1,- 

1,-1 

fL 

1060 

DATA  -1 

,-l 

1 

-1 

-1 

-1.- 

l.-l,  4 

14 

14 

-1 

-1.- 

1,-1 

KI 

1070 

DATA  -1 

,  0 

, -1 

,  1 

-1 

,-1.- 

1.  4,-1 

.  0 

,  0 

,-1 

14 

,-!,- 

1,-1 

IK 

1080 

DATA  -1 

,-1 

,  0 

,-1 

,-1, 

4,-1,  0 

,-l 

,-1 

,  0 

-1 

,  14,- 

1,-1 

NP 

1090 

DATA  -1 

,  -1 

,-1 

,  0 

,  -1 

,  5,- 

1,  0,-1 

,-1 

,-1 

,-1 

,-1,  1 

4,-1 

AF 

1100 

DATA  -1 

,-1 

,-1 

,-1 

.-1, 

1,-1,-1 

,-1 

.-1 

,-1 

,  -1 

,  0,- 

1,14 

ON 

1110 

DATA  -1 

,-1 

,-1 

,  4 

,-1 

,  0.- 

1,  1,-1 

,-1 

,-1 

,-1 

,-I 

1-1, 

0,-1 

HH 

1120 

DATA  -1 

-1 

,  4 

,-I 

.-1. 

0,-1,  1 

,-1 

,-1 

,-1 

-1 

,-1,1 

4,-i 

KL 

1130 

DATA  -1 

,-1 

,  0 

-1 

,-!,- 

1,  0,-1 

,-1 

,-1 

-1 

,14,- 

1,  0 

BF 

1140 

DATA  -1 

,-1 

,  0 

-1 

-1 

.-1,- 

1,-1,  m 

,  -1 

,  1 

-1 

14 

-1, 

0,-1 

CK 

1150 

DATA  -1 

,  -1 

,  4 

-1 

-1 

-1,- 

1,-1,-1 

-1 

2 

-1 

0,- 

1,-1 

OK 

1160 

DATA  -I 

,-l 

4 

-1 

.-1,- 

1.-1,-1 

,  -1 

14 

-1 

-1,- 

1,-1 

Pfl 

1170 

DATA  -1 

,  -1 

0 

-1 

-1.- 

1,-1.-1 

,  14 

-1 

0 

-I 

1,- 

1,-1 

AG 

1180 

DATA  -1 

,  -1 

-1 

0 

-1 

4,- 

1,-1,14 

,  -1 

0 

-1 

-1, 

l.-l 

IF 

1190 

DATA  -1 

,-1 

-1 

-1 

-1, 

4,14,-1 

>  <l> 

-1 

-1 

-1 

0,- 

1.  1 

11 

1200 

DATA  -1 

,  -1 

-1 

-1 

-1 

0, 

6,  6,  0 

,  -1 

-1 

-1 

-1 

-1, 

0,-1 

BB 

1210 

DATA  -1 

,-1 

-1, 

-1, 

-1 

14,1 

4,  4,  4 

,  0 

-1, 

-1, 

-1 

-1, 

1,-1 

JE 

1220 

DATA  -1 

,  -1 

-1, 

-1, 

14 

-1, 

0,  0,-1 

,  4> 

0, 

-1, 

-1 

1,- 

1,  0 

PE 

1230 

DATA  -1 

,-1, 

-1, 

14, 

-1, 

0,- 

1,-1.  0 

-1 , 

4, 

-1, 

-1, 

0,-1 

ID 

1240 

DATA  -1 

-1 , 

14, 

-1, 

-1,- 

1,-1,-1 

0. 

-1, 

5, 

"1 , 

0,- 

l.-l 

SI  1250  DATA  -1,14,-1,  0,-1,-1,- 
1,-1.-1,-1,  1,-1,  4,-1,- 
l.-l 

Hfl  1260  DATA  -1,-1,  0,-1,-1,-1,- 
1,-1,-1,  1,-1.  0,-1,  4,- 

IN  1270  DATA  -1,-1,14,-1,-1,-1,- 

1,-1,  1,-1,  0,-1,  0,-1, 

4,-1 
01  1280  DATA  -1,  0,-1,14,-1,-1,- 

1,  1,-1,  0,-1,-1,-1,  0,- 

1,  4 
CK  1290  DATA  -1,-i,  0,-1,14,-1, 

1,-1,  0,-1,-1,-1,-1,-1, 

0,-1 


Program  3:  Animated  Sign 

ID  10  '  Program  #3  -  Animated  Si 
QH 

Bft  20  CLEAR, ,,32768!: KEY  OFF: SCR 
EEN  5! CLS: DEFINT  PtDIM  P<9 
5) 

BH  30  C=1:F0R  X=0  TO  310  STEP  8. 
75:LINE(X,0>-(X+5,5) ,C,BF: 
LINE(X,195)-(X+5,200) ,4-C, 
BF:C=C+1:IF  C»=4  THEN  C=l 

OB  40  NEXT 

J«  50  C=3:F0R  Y-0  TD  190  STEP  8, 
850001:  LINE(0,Y)-<5,Y+5), 
4-C, BFs LINE (306, Y)- (311, Y+ 
5>,C,BF:C=C+1:IF  C=4  THEN 
C=l 

OB  60  NEXT 

HE  70  S*="BR6  BDl  HI  L4  61  Dl  Fl 
R4  Fl  Dl  01  L4  HI  BU3  BR6 
.  ■■ 

EN  80  I«="ND6;  " 

FC  90  ES="BD1  BR6  HI  L4  61  D4  Fl 

R4  El  U2  NL3  BU3; " 
QG  100  N«="ND6  F6  U6;" 
00  110  FOR  Z=l  TD  5:  FOR  A=l  TO  Z 

:Y=2t30+A-15:FOR  B=l  TO  Z 

: X=Z*20+B+50!S=Z«4:C=Z+3 
PO  120  DRAW  "BM=X;,=Y;  C=C;  S=S; 
XSS;BR2; XI»;BR2; XG*;BR2; 

XN«;  " 
KP  130  NEXT  B,A,Z 
CB  140  LOCATE  3, 25:  COLOR  13,0:  PR 

INT  "ALL  THIS": LOCATE  5,2 

2:PRINT  "and  still  have": 

LOCATE  7,22:A«="8  colors 

open" 
Pt  150  FOR  Z  =  l  TO  7:  COLOR  Z  +  8,0: 

PRINT  MID*(fl», (Z-l)*2+l,2 

);:NEXT 
10  160  LOCATE  19,  5:  A»="  TEXT":  FOR 
Z=l  TD  4:C0L0R  9-Z,0:PRI 

NT  MID*(A«,Z, 1);:NEXT 
K    170  FDR  Z=0  TD  95:READ  P(Z):N 

EXT  Z 

HO   1B0    FOR    Z=0    TD    5:  PALETTE    US  IN 

6    P(Z«16):NEXT:BDTD    180 
BB    1000    DATA    -1,-1,     4,     0,    6,     2, 

3,  4,    5,-1,-1,-1,-1,-1,- 
1,-1 

HC    1010    DATA    -1,     4,     0,-1,     5,     6, 

2,     3,     4,-1,-1,-1,-1,-1,- 

1,-1 
8t   1020    DATA    -1,     0,-1,     4,    4,     5, 

6,     2,     3,-1,-1,-1,-1,-1,- 

1,-1 
EP    1030    DATA    -1,-1,     4,     0,     3,     4, 

5,     6,     2,-1,-1,-1,-1,-1,- 

1,-1 
ll    1040   DATA   -1,    4,    0,-1,    2,    3, 

4,  5,    6, -1,-1, -1,-1, -i|- 

LC   1050   DATA    -1,     0,-1,     4,15,13,1 
5,15,15,-1,-1,-1,-1,-1,- 
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Applesoft 
List  Enhancer 


Tired  of  program  listings  that  whiz 
across  the  screen  at  unreadable 
speeds?  This  short  utilit}/  for  Apple  11 
computers  lets  you  scroll  through  a 
listing  at  your  own  pace,  one  screen- 
ful at  a  time.  For  all  Apple  Il-series 
computers  with  DOS  33  and  ProDOS. 


LIST  is  one  of  the  most  frequently 
used  commands  in  Applesoft 
BASIC,  yet  it  has  some  inconve- 
nient features.  The  program  listing 
scrolls  upward  too  fast  to  read,  un- 
less you  repeatedly  press  CTRL-S. 
If  you  pass  the  program  lines  you 
want  to  see,  you  have  to  LIST  the 
program  again. 

"Applesoft  List  Enhancer"  is  a 
machine  language  program  that 
solves  both  of  these  problems.  It 
divides  the  program  listing  into 
pages,  and  each  page  consists  of 
one  screenful  of  the  listing.  Instead 
of  scrolling  through  the  listing  in 
only  one  direction,  you  now  page 
through  it,  either  forward  or  back- 
ward. 

Type  in  and  save  the  program 
below,  then  run  it.  This  BASIC  pro- 
gram automatically  creates  a  ma- 
chine language  file  on  disk  named 
ALE.  (Don't  use  the  name  ALE  for 
the  BASIC  program  or  you'll  get  a 
FILE  TYPE  MISMATCH  error.)  Once 
that's  done,  you  don't  need  the 
BASIC  program  again  except  to  cre- 
ate new  copies  of  ALE. 

Enter  BRUN  ALE  to  install  and 


Steven  Roth 


activate  the  List  Enhancer.  Now 
load  any  Applesoft  BASIC  pro- 
gram. To  list  it,  type  an  ampersand 
(&)  followed  by  an  optional  starting 
line  number.  If  you  don't  enter  any 
line  number,  the  program  is  listed 
from  the  beginning. 

The  right  and  left  arrow  keys 
let  you  page  forward  or  backward 
through  the  listing.  Press  the  right 
arrow  key  to  display  the  next 
screenful  of  program  lines;  the  left 
arrow  key  displays  the  previous 
page.  To  exit  listing  mode  so  you 
can  edit  a  line,  press  either  the  ESC 
key  or  CTRL-C. 

Applesoft  LIST  Enhancer 

For  instructions  on  entering  ttiis  listing,  please 
refer  to  "COMPUTEI's  Guide  to  Typing  In 
Programs"  in  tfils  Issue  of  coivipute!. 

11  100  FOR  I  =  2457i  TO  24B47:  R 

EftD  A:  POKE  I,A:CK  =  CK  + 
A:  NEXT 
ID  110  IF  CK  <  >  33557  THEN  PRIN 

T  "ERROR  IN  DATA  STATEMEN 

TS.":  STOP 
4(  120  PRINT  CHR*  (4)"BSAVE  ALE, 

A$6000,L«n0" 
2D  130  DATA  169,32,141,245,3,169 

, 16, 141 
52  140  DATA  246,3,169,96,141,247 

,3,96 
09  150  DATA  32,12,218,32,26,214, 

165,80 
71  160  DATA  141,32,97,165,81,141 

,33,97 
2(  170  DATA  32,  SB,  252,  160,0,132, 

6,200 
66  180  DATA  132,30,132,249,177,1 

55,240,75 
as  190  DATA  200,177,155,170,200, 

177, 155, 132 
01  200  DATA  9,133,8,134,7,32,36, 

237 


IC  210  DATA  164,9,169,32,32,92,2 

19, 165 
El  220  DATA  36,201,33,144,15,230 

,30, 165 
62  230  DATA  30,201,23,240,48,32, 

142,253 
il  240  DATA  169,5,133,36,200,177 

,15S,20B 
5E  250  DATA  81,163,177,155,170,2 

00, 177,155 
5(  260  DATA  134,155,133,156,32,1 

42,253,230 
fll   270    DATA    30,165,30,201,23,240 

,14, 160 
18   280    DATA    1,208,177,230,6,230, 

6,  169 
il   290    DATA    0,133,249,240,17,230 

,6,230 
4B  300   DATA    6,164,6,165,7,153,32 

.97 
C  310    DATA    200,165,8,153,32,97, 

32,12 
DB  320    DATA    253,201,155,240,13,2 

01, 131,240 
fli   330    DATA    14,201,149,240,101,2 

01, 136,240 
17   340    DATA    58,32,58,255,76,150, 

96,76 
M  350    DATA   208,3,16,144,56,233, 

127, 170 
CS   360   DATA    132,9,160,208,132,15 

7,160,207 
78   370    DATA    132,158,160,255,202, 

240,7,32 
37   380    DATA    44,215,16,251,40,246 

, 169,32 
n   390    DATA    32,92,219,32,44,215, 

4S,5 
17   400    DATA    32,92,219,208,246,32 

,92,219 
23   410    DATA    76,64,96,165,6,201,2 

,240 
3F  420    DATA    192,56,233,4,133,6,1 

66,6 
C7   430    DATA    189,32,97,133,80,232 

,189,32 
D9   440    DATA    97,133,81,32,26,214, 

32,08 
97   450    DATA    252,160,1,132,30,132 

,249,76 
a   460    DATA    44,96,165,249,208,22 

4,240,153  a 
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Loading  And  Linking 
Commodore  Programs 

Part  3 


Jim  Butterfield,  Associate  Editor 


This  month's  installment  shows  how 
one  program  can  automatically  load 
and  link  to  any  other  program.  The 
methods  described  here  work  on  any 
eight-bit  Commodore  computer  with 
either  disk  or  tape. 


There  are  three  major  ways  of  con- 
necting Commodore  programs  to- 
gether. Chaining  allows  several 
programs  to  perform  a  job,  each 
program  continuing  the  work  that  a 
previous  program  has  done.  Load- 
linking  enables  one  program  to  acti- 
vate another,  with  the  new 
program  starting  fresh  on  a  new 
task.  Overlaying  allows  a  main  pro- 
gram to  call  in  additional  subrou- 
tines, data  tables,  or  display 
information.  This  article  discusses 
load-linking. 

When  a  first  program  has  fin- 
ished a  job,  it  may  decide  to  load- 
link  to  a  second  program  to  do  a 
succeeding  task.  The  new  program 
is  not  a  continuation  of  the  previous 
program — it's  a  brand  new  job  and 
won't  share  any  information  from 
the  earlier  program  unless  it  hap- 
pens to  use  a  common  data  file. 
Load-linking  is  harder  to  achieve 
on  Commodore  computers  than 
chaining  (see  Part  2  of  this  article. 


April  COMPUTE!).  You  must  do  a 
little  extra  work  to  load-link. 

Why  Load-Linking? 

It's  common,  especially  on  non- 
Commodore  machines,  to  have  a 
disk  start  with  a  menu  program 
which  lets  a  user  pick  another  pro- 
gram to  run.  The  menu  program 
has  to  load-link  the  chosen  pro- 
gram, since  the  new  program  is  not 
a  continuation  of  the  menu.  New- 
comers to  Commodore  computers 
often  try  to  chain  from  the  menu 
program  to  the  other  program. 
However,  chaining  requires  the 
first  program  to  be  the  larger  of  the 
two,  and  menu  programs  are  al- 
most always  very  short. 

At  other  times,  when  a  group 
of  programs  work  with  one  or  sev- 
eral data  files,  it's  common  for  these 
programs  to  run  independently  of 
each  other.  Each  may  use  the  files 
in  different  ways,  with  data  stored 
in  various  kinds  of  arrays  for  each 
job.  Independent  programs  call  for 
load-linking, 

Sometimes,  a  series  of  modules 
are  arranged  to  work  together  as  a 
unit.  There  may  be  a  main  program, 
some  machine  language  programs 
in  varying  locations,  perhaps  a 
high-resolution  graphics  screen, 
and  possibly  a  special  character  set. 


The  Commodore  B128  (called  the 
700  series  in  Europe,  and  not  to  be 
confused  with  the  Commodore  128) 
often  requires  a  transfer  sequence 
program  in  order  to  run  machine 
language  programs.  All  the  various 
parts  need  to  be  arranged  in  the 
proper  areas  of  memory.  A  special 
program  called  a  bootstrap  or  boot 
brings  everything  in.  When  the 
bootstrap  program  has  completed 
its  work,  often  you  want  to  erase  it 
from  memory  after  it  sets  the  main 
program  into  operation.  Load- 
linking  can  accomplish  this  job,  too. 

Two  Methods 

There  are  two  major  ways  to  load- 
link  programs.  One  technique  is 
used  at  the  end  of  the  first  program, 
setting  up  the  load  of  the  second. 
It's  a  variation  of  the  dynamic  key- 
board technique.  The  alternative 
method  is  used  at  the  beginning  of 
the  second  program,  cleaning  up 
some  of  the  things  that  have  hap- 
pened during  the  loading  process. 
The  dynamic  keyboard  meth- 
od is  probably  the  simplest.  Essen- 
tially, it  simulates  a  user  typing  on 
the  keyboard,  giving  LOAD  and 
RUN  commands.  When  you  type 
LOAD  as  a  direct  command,  the 
new  program  comes  in  fresh.  It 
scraps  the  old  program  and  retains 
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no  variables  or  other  data.  That's 
what  we  want  with  a  load-link,  of 
course.  RUN  then  sets  the  new  pro- 
gram off  to  a  fresh  start. 

The  pointer  cleanup  method 
corrects  conditions  that  result  from 
program  chaining.  The  start-of- 
variables  pointer  needs  to  be  cor- 
rected so  it  is  set  directly  behind  the 
last  byte  loaded;  then  a  CLR  com- 
mand erases  any  leftover  variables 
and  fixes  up  the  other  pointers. 
We'll  try  each  method  in  turn. 

Dynamic  Keyboard 

The  dynamic  keyboard  technique  is 
often  described  as  "making  the 
computer  type  on  its  own  key- 
board." To  do  this,  a  program  stuffs 
characters  into  the  computer's  key- 
board buffer  and  resets  the  buffer 
counter.  When  the  computer  dis- 
covers these  characters  in  the  buff- 
er, it  thinks  they  were  actually 
typed  on  the  keyboard  and  exe- 
cutes the  commands  they  spell  out. 

Since  the  keyboard  buffer  nor- 
mally holds  only  about  nine  or  ten 
characters,  we  can't  store  a  com- 
plete load  sequence  there.  But  we 
can  use  Commodore's  screen-editing 
capability.  We  print  a  command  on 
the  computer's  screen,  move  the 
cursor  back  onto  the  command  line, 
then  store  one  character  (a  carriage 
return,  character  13)  in  the  buffer. 
To  perform  LOAD  followed  by 
RUN,  we  print  two  command  lines 
and  store  two  RETURNS  in  the 
buffer.  The  effect  is  the  same  as  if 
you  typed  in  the  LOAD  and  RUN 
commands  by  hand.  The  new  pro- 
gram starts  as  a  fresh,  independent 
job — you'll  have  performed  a  suc- 
cessful load-link. 

The  keyboard  buffer  and  its 
counter  occupy  various  memory  lo- 
cations in  different  Commodore 
computers.  You'll  need  to  use  the 
appropriate  addresses  for  your  ma- 
chine. The  following  table  will 
help: 


To  execute  two  command  lines 
with  this  method,  we'll  POKE  a 
value  of  2  into  the  counter  and  a 
value  of  13  (RETURN)  into  the  first 
two  locations  of  the  buffer.  The  fol- 
lowing example  uses  Commodore 
64  addresses. 

Dynamic 
Keyboard  Example 

Let's  write  two  simple  programs 
and  let  the  menu  program  select 
which  one  to  run.  Type  in  this  sim- 
ple square  root  program: 

100  PRINT  "TABLE  OF  SQUARE  ROO 

TS" 
110  FOR  J=l  TO  20 
120  PRINT  J,  SQR(J) 
130  NEXT  J 

You  can  try  running  the  pro- 
gram if  you  want.  It's  not  very  excit- 
ing, but  it  does  work.  Now  save  it 
with  the  filename  SQUARE  (don't 
substitute  any  other  filename). 
Type  NEW  and  enter  this  simple 
cube  root  program: 

100  PRINT  "TABLE  OF  CUBE  ROOTS 

110  X=l/3 
120  FOR  1=1  TO  20 
130  PRINT  I,  ITX 
140  NEXT  I 

Again,  you  might  try  running 
the  program.  Save  it  with  name 
CUBE  when  you're  satisfied  that  it 
works.  Type  NEW  again.  Now 
we'll  write  a  simple  loading  pro- 
gram that  uses  the  dynamic  key- 
board technique  to  perform  load- 
linking.  This  program  runs  as  listed 
on  the  VIC-20  and  Commodore  64. 
For  another  type  of  machine,  use 
the  table  above  to  change  the  POKE 
addresses  in  lines  280,  290,  and  300. 

100  DATA  SQUARE, CUBE 

110  READ  AS(1),A$(2) 

120  PRINT  "WHICH  ROOTS  DO  YOU 

[SPACE} WANT — " 

130  FOR  J=l  TO  2 

140  PRINT  A$(J) 

150  NEXT  J 

160  INPUT  "WHICH  (1  OR  2)"fN 

170  IF  N<1  OR  N>2  GOTO  120 

180  PRINT  CHR$(147) 

190  PRINT 

200  PRINT 


210  PRINT  "LOAD";CHR?(34) rA?(N 

);CHR?(34) r",8" 
220  PRINT 
230  PRINT 
240  PRINT 
250  PRINT 
260  PRINT  "RUN" 
270  PRINT  CHR5(19) 
280  POKE  198,2 
290  POKE  631,13 
300  POKE  632,13 
310  END 

In  this  case,  the  menu  program 
is  longer  than  the  programs  it  loads. 
But  that  doesn't  matter.  This  meth- 
od works  the  same  regardless  of  the 
length  of  the  programs  involved. 
You  will  see  the  LOAD  and  RUN 
commands  appear  on  the  screen. 

Pointer  Cleanup  Method 

The  previous  method  puts  extra 
commands  in  the  first  program  to 
load  the  second.  Now  we'll  look  at 
another  method  that  adds  com- 
mands to  the  start  of  the  second 
program.  At  this  point,  the  new 
program  has  been  chained — the 
old  variables  and  their  pointers  still 
exist.  To  start  out  fresh,  we  must 
erase  the  old  variables  and  make 
sure  that  new  variables  go  into  the 
proper  memory  area.  What  we're 
doing  is  changing  a  chain  into  a 
load-link. 

Our  task  is  to  set  the  start-of- 
variables  pointer  to  the  correct  ad- 
dress and  then  perform  CLR  to 
erase  the  old  variables.  On  the  B128 
and  Commodore  128  in  128  mode, 
there's  a  slight  difference.  Here,  we 
don't  need  to  set  the  start-of- 
variables,  since  variables  are  held  in 
a  different  memory  bank.  Instead, 
we  set  a  different  pointer  (called 
end-of-BASlC)  which  doesn't  exist 
on  the  other  machines. 

Now  that  we  know  which 
pointer  to  change,  we  must  decide 
what  value  to  put  there.  The  value 
will  be  the  address  of  the  last  byte 
loaded,  plus  one.  Immediately  after 
a  load,  we  can  find  this  address  still 
in  a  pointer.  Here's  a  table  to  show 
the  various  locations: 


VlC-20,  Commodore  64 
Commodore  128  in  128  mode 
Commodore  16,  Plus/4 
PET/CBM  with  4.0  BASIC 
Original  ROM  PETs 
B-128  (Model  700) 


Key 

Start  Of 

Counter 

Buffer 

198 

631 

20S 

842 

239 

1319 

158 

623 

525 

527 

209 

939 

VIC-20,  Commodore  64 
Commodore  128  in  128  mode 
Commodore  16,  PIus/4 
PET/CBM  with  4.0  BASIC 
Original  ROM  PETs 
B-128  (Model  700) 


Pointer 

Pointer 

to  be 

where  value 

changed 

is  found 

45/46 

174/175 

4624/4625 

174/175 

45/46 

157/158 

42/43 

201/202 

124/125 

229/230 

47/48 

150/151 
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After  the  pointer  is  fixed,  be 
sure  to  perform  CLR  to  reset  all  the 
other  variable  pointers.  Again,  these 
steps  must  be  taken  at  the  very  be- 
ginning of  the  new  program. 

Pointer  Cleanup  Example 

Here's  an  example  similar  to  the 
previous  one  which  demonstrates 
the  second  method.  This  is  the 
menu  program: 

100  DATA  SQUARE1,CUBE1 

lis  READ  A5(1),AS(2) 

120  PRINT  "WHICH  ROOTS  DO  YOU 

[SPACE  J  WANT  —  " 

130  FOR  J=l  TO  2 

140  PRINT  A5(J) 

150  NEXT  J 

160  INPUT  "WHICH  (I  OR  2)";N 

170  IF  N<1  OR  N>2  GOTO  120 

180  LOAD  AS(N),8 

Notice  that  this  menu  program 
is  much  shorter  than  the  first  ex- 
ample. We'll  do  the  extra  work 
when  we  write  the  programs  to  be 
loaded.  Save  the  menu  program, 
then  enter  NEW  and  type  these 
lines: 

70  POKE  45, PEEK (174) 

80  POKE  46, PEEK (175) 

90  CLR 

100  PRINT  "TABLE  OF  SQUARE  ROO 

TS" 
110  FOR  J=l  TO  20 
120  PRINT  J,  SQR{J) 
130  NEXT  J 

This  is  similar  but  not  identical 

to  the  first  square  root  program. 
The  difference  is  the  three  extra 
lines  at  the  beginning.  Don't  try  to 
run  this  program  yet;  instead,  save 
it  with  the  filename  SQUAREl.  En- 
ter NEW  a  second  time  and  enter 
this  simple  cube  root  program: 

70  POKE  45, PEEK (174) 

80  POKE  46,PEEK( 175) 

90  CLR 

100  PRINT  "TABLE  OF  CUBE  ROOTS 

110  X=l/3 

120  FOR  1=1  TO  20 

130  PRINT  I,  ITX 

140  NEXT  I 

Save  this  program  with  the 
filename  CUBEl.  If  you  have  a 
computer  other  than  the  Commo- 
dore 64  or  VIC-20,  remember  to 
change  the  POKE  and  PEEK  values 
in  lines  70  and  80  of  both  these 
programs  according  to  the  table 
above. 

Now  load  the  menu  program 
and  run  it.  You've  seen  two  differ- 
ent ways  to  perform  load-linking.  A 
program  can  get  another  program 
off  to  a  clean  start  by  using  either  of 
these  techniques. 


Better 

Branching 

In  Applesoft 


Mark  Russinovich 


Are  you  ready  to  update  the  Applesoft 
BASIC  on  your  Apple  Il-series  com- 
puter? This  handy  utility  adds  extra 
flexibility  by  letting  you  branch  to 
line  numbers  computed  by  variables 
or  even  complex  expressions.  For  both 
DOS  3.3  and  ProDOS. 


Though  it's  been  used  to  write  a 
tremendous  number  of  programs, 
Applesoft  BASIC  has  some  signifi- 
cant shortcomings  compared  to 
more  recent  versions  of  BASIC. 
One  of  these  is  the  inability  to  use  a 
variable  or  BASIC  expression  as  the 
object  of  a  GOTO,  GOSUB,  or  RE- 
STORE command.  Applesoft 
BASIC  requires  you  to  use  a  line 
number  as  the  destination  of  a 
GOTO,  GOSUB,  or  RESTORE. 

There  are  two  disadvantages  to 
this.  First,  line  numbers  contain  no 
clue  to  the  purpose  of  the  branch; 
GOSUB  DELAY  makes  the  purpose 
of  a  subroutine  more  obvious  to 
everyone  than  GOSUB  1000.  Sec- 
ond, branching  statements  that  are 
limited  to  constants  can't  be  modi- 
fied while  a  program  is  executing. 
Unlike  line  numbers,  variables  can 
change  as  a  program  runs,  letting 
you  modify  the  destination  of  a 
command  just  by  changing  the  val- 
ue of  the  variable.  For  example,  you 


could  use  GOSUB  CHOICE*1000 
to  branch  to  subroutines  at  lines 
1000,  2000,  or  3000  depending  on 
whether  the  variable  CHOICE 
equals  1,  2,  or  3. 

Improved  GOTO 
And  GOSUB 

"Enhancer"  lets  you  substitute 
variables  and  even  complex  expres- 
sion3  as  the  object  of  GOTO,  GO- 
SUB, and  RESTORE  in  Applesoft 
BASIC.  To  use  it,  first  enter  Pro- 
gram 1  and  be  sure  to  save  a  copy. 
Program  1  is  a  BASIC  program  that 
creates  the  machine  language  rou- 
tine for  Enhancer  on  disk,  using  the 
filename  APPLE. ENHANCER.  (Be 
careful  to  use  some  name  other  than 
APPLE.ENHANCER  for  Program  1 
itself;  otherwise,  you'll  get  a  FILE 
TYPE  MISMATCH  error  when  you 
run  it.) 

After  you've  created  the 
APPLE.ENHANCER  file,  you 
won't  need  Program  1  agiin,  except 
to  make  additional  copies  of  the 
machine  language.  To  load  and  ac- 
tivate the  utility,  add  this  line  to  the 
beginning  of  any  BASIC  program: 

10  PRINT  CHR$(4)"BRUN  APPLE. 
ENHANCER" 

Make  sure  the  Enhancer  ma- 
chine language  file  is  on  the  disk  in 
the  current  drive.  As  soon  as  your 
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program  executes  this  line,  it  can 

use  the  features  of  APPLE. EN- 
HANCER. You  can  still  use  the  nor- 
mal form  of  GOTO  and  G05UB 
(GOTO  100,  GOSUB  20005,  or 
whatever),  hut  in  addition,  you  can 
also  use  this  format; 

&  GOTO  expression 
&  GOSUB  expression 

Note  the  ampersand  (&)  sym- 
bol that  precedes  the  GOTO  or  GO- 
SUB. In  place  of  expression,  you  can 
substitute  any  legal  Applesoft  vari- 
able name  or  expression.  Here's  a 
short  example  to  show  how  the 
new  commands  work: 

AS  10  BEGIN  =  20 

7B  20  INPUT  "CHDDBE  1  OR  2  " ;  CHD 

ICE 
B5  30  IF  CHOICE  <  1  OR  CHOICE  > 

2  THEN  tc  GOTO  BEGIN 
6D  40  St  GOSUB  CHOICE  *  1000 
Ffl  50  PRINT  "DONE. " 
Fl  60  END 

51  1000  PRINT  "FIRST  ROUTINE" 
15  1010  RETURN 

JE  2000  PRINT  "SECOND  ROUTINE" 
ib   2010  RETURN 

Notice  how  the  improved  GO- 
SUB serves  as  a  substitute  for  ON- 
GOSUB.  Depending  on  what  value 
CHOICE  has,  the  program 
branches  to  line  1000  or  2000.  Like- 
wise, the  improved  GOTO  com- 
mand can  replace  an  ON-GOTO 
command. 

RESTORE  To  A  Destination 

The  RESTORE  statement  in  Apple- 
soft normally  stands  by  itself;  it 
simply  resets  the  READ  pointer  to 
the  beginning  of  the  program.  If 
you  wish  to  READ  a  particular 
piece  of  data  midway  through  the 
list,  you  first  READ  past  every  pre- 
ceding DATA  item  in  the  program. 
With  APPLE.ENHANCER  in  place, 
you  can  use  this  more  convenient 
command: 
&  RESTORE  expression 

Again,  you  must  include  the 
ampersand  before  the  command; 
replace  expression  with  any  legal 
Applesoft  expression  or  variable. 
Now  you  can  access  any  DATA  line 
in  the  program  instantly. 

For  instance,  say  that  a  pro- 
gram has  many  DATA  statements 
containing  information  for  three 
different  graphics  screens.  Ordi- 
narily, you'd  have  to  READ 
through  all  the  DATA  for  screens  1 
and  2  before  reaching  the  DATA  for 
screen  3 — a  process  that  takes  time 


and  increases  the  possibility  of 
errors.  The  improved  RESTORE 
command  allows  you  to  zero  in  on 
the  precise  DATA  line  you  want, 
without  time-consuming  delays. 

Program  2  demonstrates  all  the 
features  of  these  new  commands. 
Without  these  features,  the  pro- 
gram would  be  considerably  longer 
and  less  flexible. 


For  Instructions  on  entering  these  listings, 
pfease  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Programs"  in  this  issue  of  compute!. 

Program  1 :  APPLE. 
ENHANCER  Fllemaker 

ED    10   FDR    I    =    76B    TO    BB7:     READ    A 

:    POKE    I.fttCK    =    CK    +   A:    NE 

XT 

7fl   20    IF    CK    <     >    14482    THEN    PRINT 

"ERROR  IN  DftTfl  STATEMENTS 

."!  STOP 

El  30  PRINT  CHR*  (4)"BSAVE  APPLE 

. ENHANCER, fi»300, L*77" 
E£  40  DATA  169,76,141,245,3,169, 

16, 141 
fl8  50  DATA  246,3,169,3,141,247,3 

,96 
El  60  DATA  160,0,  177,  1B4, 217,  115 

,3,240 
88  70  DATA  11,200,192,3,240,3,76 

,20 
a   90  DATA  3,32,201,222,140,118, 

3,230 
B«  90  DATA  184,208,2,230,185,32, 

103,221 
n    100  DATA  172,118,3,192,1,240, 

10, 192 
75  110  DATA  2,240,35,32,82,231,7 

6,65 
»    120  DATA  217,169,3,32,214,211 

, 165,185 
M    130  DATA  72,165,184,72,165,11 

8,72.165 
BF  140  DATA  117,72,169,176,72,32 

,82,231 
H  150  DATA  32,65,217,76,210,215 

,32,82 
U    160  DATA  231,32,26,214,56,165 

, 155,233 
4J  170  DATA  1,164,156,176,1,136, 

133, 125 
AS  180  DATA  132,126,96,171,176,1 
74,0,0 


Program  2;  Better  Branctiing 
Demo 


ED  10  PRINT  CHR$  (4)  "BRUN  APPLE. 

ENHANCER" 
53  20  TEXT  :  HOME 
EF  30  &  RESTORE  100 
CB  40  FDR  I  =  1  TO  3:  READ  A:  & 

GOSUB  50  -I-  A  t  10:  NEXT  I 
Ff  50  END 
FC  60  PRINT  "THIS  IS  STATEMENT  2 

"  :  RETURN 
7E  70  PRINT  "THIS  IS  STATEMENT  3 

":  RETURN 
7E  80  PRINT  "THIS  IS  STATEMENT  1 

":  RETURN 
F«  90  DATA  THIS  IS  UNWANTED  DATA 
55  100  DATA  3,  1,2  © 
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Random  Numbers 

In  Machine  Language 
For  Commodore  64 


Here  are  two  different  methods  for 
obtaining  random  numbers  from  ma- 
chine language  on  the  Commodore  64. 
Even  if  you're  not  a  machine  language 
programmer,  you  may  find  the  expla- 
nation of  the  RND  function  useful  itt 
BASIC  programmit^g. 


Sooner  or  later,  nearly  every  pro- 
grammer needs  to  generate  random 
numbers.  They're  useful  for  intro- 
ducing an  element  of  uncertainty  in 
games,  as  well  as  many  other  appli- 
cations. Random  numbers  are  easi- 
ly available  in  BASIC  with  the  RND 
function,  but  it's  not  so  easy  to  gen- 
erate these  numbers  in  machine 
language.  Two  different  methods 
are  available  on  the  Commodore 
64:  The  first  involves  the  BASIC 
RND  funchon,  and  the  second  uses 
the  SID  (Sound  Interface  Device) 
chip. 

BASIC'S  RND  Function 

The  BASIC  routine  which  performs 
RND  is  at  memory  location  $E097 
(decimal  57495)  in  the  Commodore 
64's  Read  Only  Memory  (ROM). 
This  function  generates  values  of 
different  types,  based  on  a  seed 
number.  Random  numbers  gener- 
ated by  the  RND  function  are  not 
truly  random;  rather,  they  are  part 
of  a  very  long,  repeating  number 
series  (hence,  the  term  pseudo- 
random numbers).  However,  they 
are  usable  as  random  numbers  in 
most  programs. 

There  are  three  different  ways 


Neil  Boyle 


to  use  RND  in  BASIC.  If  you  supply 
a  positive  number  inside  the  paren- 
theses— for  instance,  RND(l) — the 
first  seed  value  used  is  the  one  cop- 
ied from  ROM  to  locations  $8B-$8F 
when  you  turn  the  computer  on. 
Each  subsequent  seed  value  is  gen- 
erated by  scrambling  the  previous 
one.  The  RND  function  looks  at  the 
sign  of  the  number  in  parentheses 
to  see  whether  it's  positive,  but 
does  not  use  the  number  itself. 
Thus,  since  RND(1234)  and 
RND(l)  both  use  positive  values, 
both  expressions  produce  exactly 
the  same  result. 

What  this  means  in  practice  is 
that  RND  with  a  positive  number 
produces  exactly  the  same  number 
sequence  each  time  you  turn  on  the 
computer.  To  demonstrate,  enter 
SYS  64738  to  reset  the  computer, 
then  enter  the  following  line  in  di- 
rect mode  (without  a  line  number): 
FOR  J  =  l  TO  5;PRINT  RND(1):NEXT 

The  computer  prints  these 
numbers: 

.185564016 

.0468986348 

.827743801 

.554749226 

.897233831 

Now  reset  the  computer  and 
enter  the  same  line,  substituting  a 
different  positive  number  in  the  pa- 
rentheses. As  you'll  see,  positive 
values  generate  the  same  results 
whether  you  use  RND(l)  or  RND 
(65536).  Since  the  reset  stores  the 
same  values  in  the  seed  locations, 
and  RND's  scrambling  method  is 


predictable,  the  same  numbers 
show  up  every  time. 

If  you  supply  a  zero  inside  the 
parentheses,  RND  gets  values  from 
the  computer's  internal  timer  A  and 
the  time-of-day  clock  on  CIA  chip 
#1  to  use  as  the  seed.  Since  the 
clock  values  are  constantly  chang- 
ing, this  would  seem  to  be  a  way  to 
generate  more  truly  random  num- 
bers. However,  because  the  time- 
of-day  clock  operates  with  binary 
coded  decimal  numbers,  certain 
values  never  appear  in  the  seed. 
Thus,  the  randomness  of  RND(O)  is 
questionable.  To  illustrate  this,  en- 
ter and  run  the  following  one -line 
program: 

10  POKE  1024  +  (RND(O)  *  1000),  160; 
GOTO  10 

The  many  unfilled  character  spaces 
on  the  screen  represent  values  that 
are  never  generated  by  RND(O). 

When  you  supply  a  negative 
number  in  the  parentheses,  RND 
uses  the  value  itself  as  the  seed.  For 
instance,  enter  the  following  line  in 
direct  mode: 

X  =  RND(-654321):PRINT  RND(l) 

The  result  is  always 
.333675369.  If  you  substitute  a  dif- 
ferent negative  number,  RND  gen- 
erates a  different  yet  predictable 
result.  This  can  be  useful  when  test- 
ing a  program:  To  generate  the 
same  series  of  numbers  each  time, 
set  the  seed  with  a  negative  num- 
ber, then  use  RND  with  a  positive 
number.  In  cases  where  you  want  a 
wholly  unpredictable  number  se- 
ries, the  best  method  is  to  start  with 
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X=RND(-TI)  to  begin  with  an 
unknown  seed  value^  then  use  pos- 
itive RND  arguments  thereafter. 
Since  the  seed  value  depends  on 
how  many  sixtieths  of  a  second 
have  elapsed  since  you  turned  on 
the  computer  (or  reset  the  software 
clock  with  TI$),  the  results  are  un- 
predictable enough  to  satisfy  most 
ordinary  needs. 

Calling  RND  From  ML 

To  call  the  RND  function  from 
within  an  ML  program,  execute  JSR 
$E09A.  The  value  held  in  the  accu- 
mulator register  when  you  call  the 
routine  determines  what  RND 
does.  If  the  accumulator  holds  a 
negative  byte  value  {$80-$FF),  then 
the  value  in  floating  point  accumu- 
lator 1  (FACl)  is  used  as  the  seed.  If 
the  accumulator  holds  zero,  RND 
uses  values  from  timer  A  and  the 
time-of-day  clock,  just  as  in  BASIC. 
If  the  accumulator  value  is  positive 
($00-$7F),  then  the  seed  value  in 
locations  $8B-$8F  is  used. 

Thus,  your  choices  for  ML  pro- 
gramming are  essentially  the  same 
as  for  BASIC,  except  that  the  sys- 
tem variable  TI  is  not  available  as 
an  argument.  An  alternative  to 
using  Tl  is  to  load  the  byte  values 
from  the  software  clock  ($A0-A2) 
directly  into  the  seed  addresses 
($8B-8F),  thus  giving  a  fairly  ran- 
dom seed.  If  you'd  rather  not  both- 
er with  loading  the  accumulator, 
you  can  perform  JSR  $EOBE  to  go 
directly  to  the  routine  which  uses 
the  stored  seed  value. 

As  you  probably  know  from 
using  RND  in  BASIC,  the  function 
always  returns  a  floating  point 
number  between  0  and  1.  In  ma- 
chine language,  it  is  usually  more 
convenient  to  use  a  single  byte  val- 
ue in  the  range  0-255.  Unfortunate- 
ly, some  of  the  randomness  of  the 
BASIC  floating  point  number 
comes  from  scrambling  the  bytes  in 
FACl;  this  is  lost  when  single  bytes 
are  used.  One  alternative  is  to  con- 
vert the  floating  point  number  to  an 
integer  and  use  one  or  more  bytes 
of  the  integer.  But  this  is  somewhat 
awkward.  Nonrepeating  random 
numbers  involving  all  possible  sin- 
gle byte  values  seem  to  be  pro- 
duced in  locations  $63  and  $64  of 
FACl  after  a  call  to  $E09A  with  the 
accumulator  set  appropriately.  The 


values  found  in  locations  $62  and 
$65  do  not  include  all  the  values 
from  0-255  and  therefore  should 
not  be  used. 

SID'S  Random  Number 
Generator 

The  64's  SID  chip  also  has  the  abili- 
ty to  generate  random  values  and  is 
very  easy  to  use.  All  you  need  to  do 
is  select  the  noise  waveform  for  the 
SID's  voice  3  oscillator  and  set 
voice  3's  frequency  to  some  non- 
zero value  (the  higher  the  frequen- 
cy, the  faster  the  random  numbers 
are  generated).  It  is  not  necessary  to 
gate  (turn  on)  the  voice.  Once  this  is 
done,  random  values  appear  in  lo- 
cation $D41B.  The  parameters  need 
only  be  set  once,  as  shown  in  this 
example.  (YouTl  need  a  machine 
language  assembler  to  enter  this 
and  the  following  example;  the 
semicolons  and  the  comments 
which  follow  them  are  optional.) 

LDA  #$FF  ;  maximum  frequency  value 

STA  $D40E  ;  voice  3  frequency  low  byte 

STA  $D40F  ;  voice  3  frequency  high  byte 

LDA  #$80  ;  noise  waveform,  gate  bit  off 

STA  $D412  ;  voice  3  control  register 
RTS 

Once  this  code  is  executed,  the 
SID  chip  continuously  produces 
random  byte  values,  which  you  can 
retrieve  with  a  statement  like  LDA 
$D41B.  This  method  works  only  on 
the  Commodore  64  and  128,  since 
only  those  two  computers  have  a 
SID  chip.  Values  obtained  from  the 
SID  chip  do  seem  to  be  random: 
Each  of  the  values  in  the  range 
0-255  occurs  at  about  the  same  fre- 
quency, and  the  series  does  not  re- 
peat in  the  first  34,000  values. 

In  many  cases,  you'!!  want  to 
obtain  random  numbers  only  with- 
in a  certain  range.  In  BASIC,  this  is 
done  with  a  statement  like  RND 
(1)*(U~L)+L.  Here  the  variables 
U  and  L  stand  for  the  upper  and 
lower  limits,  respectively,  of  the 
number  range  we  want.  This  state- 
ment produces  integer  numbers 
within  that  range,  excluding  the 
first  and  last  values  in  the  range  (for 
instance,  if  U  =  30  and  L  =  l,  then 
30  and  1  do  not  appear  in  the  se- 
ries). To  include  the  first  and  last 
values,  use  a  statement  like  INT 
(RND(1)*(U-L+1)  +  L. 

In    machine   language,   we're 

usually  interested  in  single  byte 
values:  integers  in  the  range  0-255. 


Should  larger  values  be  needed, 
you  can  always  generate  two  or 
more  bytes  and  combine  them.  Get- 
ting numbers  within  a  certain  range 
is  simply  a  matter  of  generating 
numbers  until  you  find  one  that 
falls  in  the  range  you  want.  For 
instance,  the  following  routine  gen- 
erates numbers  within  the  range 
$10-$40  (before  performing  this 
routine,  you  must  set  up  the  SID 
chip  as  shown  above): 

RAND  LDA  $D41B  ;  get  random  value 

from  0-255 
CMP  #$31     ;  compare  to 

U-L+1 
;  U-L-l-1  =  $31  = 

$40-$10  +  $01 
BCS  RAND  ;  branch  if  value  > 

U-L-l-l 
ADC  #$10     ;  add  L 
RTS 

This  routine  generates  random 
numbers  until  one  is  found  that 
falls  between  0  and  the  difference 
between  the  high  and  low  values. 
Then  the  low  value  is  added  to  the 
result  to  give  a  value  between  the 
low  and  high  limits,  inclusive.  If  the 
range  is  very  small,  many  numbers 
may  have  to  be  generated  before 
you  find  one  that's  suitable. 

You  can  decrease  the  delay  by 
ANDing  the  random  number  with  a 
value  that  removes  the  unwanted 
higher  bits.  For  instance,  if  the  dif- 
ference between  the  low  and  high 
limits  is  $0A,  then  AND  the  ran- 
dom value  with  $0F  to  remove  the 
four  high  bits,  then  test  whether  it 
falls  within  the  range.  One  useful 
special  case  deserves  mention.  To 
generate  an  integer  in  the  range  —  1 
to  1  inclusive,  use  the  BASIC  state- 
ment INT(RND(1)'3)-1.  To  get  a 
value  between  $01  and  $FF  in  ma- 
chine language,  AND  the  random 
value  with  $03  and  use  a  routine 
like  the  one  shown  above,  where 
L=$FF  and  U-L+l  =  $03. 

The  method  you  use  to  gener- 
ate random  numbers  depends  on 
your  needs.  In  machine  language,  if 
repeatable  values  aren't  needed,  it's 
simplest  to  use  the  SID  chip. 
Should  repeatable  values  be  re- 
quired (for  testing  a  routine,  etc.), 
set  the  chosen  seed  in  the  seed  loca- 
tions $8B-$8F,  call  the  ROM  rou- 
tine at  $EOBE,  then  use  the  value 
found  in  locations  $63  or  $64  for 
the  random  number.  Due  to  its 
questionable  randomness,  the  timer/ 
clock  method  is  not  recommended.® 
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Amiga  Puzzle 


Bill  Boegelein 


The  following  programs  provide  you 
with  an  entertaining  puzzle  game  that 
pops  up  as  a  small  window  on  the 
Workbench  screen.  But  more  impor- 
tantly, they  demonstrate  some  inter- 
esting and  powerful  programming 
techniques  in  Amiga  BASIC. 


A  popular  game  that  used  to  keep 
kids  occupied  for  hours  in  the  back 
of  the  station  wagon  was  known  as 
the  "slide  puzzle."  This  was  simply 
a  plastic  frame  with  15  numbered 
or  lettered  tiles  arranged  in  a  4  X  4 
pattern  with  one  square  left  vacant. 
The  object  was  to  slide  one  tile  at  a 
time  into  the  vacant  slot  in  an  at- 
tempt to  restore  the  puzzle  to  its 
proper  numeric  or  alphabetic  order. 
"Amiga  Puzzle"  is  the  Amiga 
BASIC  equivalent  of  the  slide  puzzle. 
Amiga  Puzzle  works  on  any 
Amiga  with  Amiga  Microsoft 
BASIC  (not  ABasiC— Amiga  BASIC 
is  available  as  a  free  upgrade  if  your 
computer  was  shipped  with  ABa- 
siC). To  get  started,  run  Amiga 
BASIC,  enter  Program  1  below,  and 
save  a  copy  on  disk.  Be  sure  to  set 
Preferences  for  a  60-column  screen 
before  running  Amiga  Puzzle. 
When  you  run  the  program,  it  pops 
open  as  a  small  window  on  the 
Workbench  screen  and  scrambles 
the  tiles.  When  the  program  an- 
nounces "Ready"  using  the  Ami- 
ga's built-in  speech  capability,  you 
can  begin. 

To  move  a  tile  into  the  vacant 
slot,  point  to  the  tile  with  the  mouse 
and  press  the  left  mouse  button.  If 
you  try  to  cheat  by  moving  a  tile 
diagonally,  the  program  will  scold 
you.  The  gadget  in  the  lower-right 


This  photo  shows  two  copies  of  "Amiga 
Puzzle"  running  simultaneously,  an  ex- 
ample of  the  Amiga's  multitasking 
capabilities. 

comer  of  the  window,  normally  re- 
served for  window  resizing,  has 
been  replaced  with  a  plus  sign  in 
Amiga  Puzzle.  Clicking  on  this  gad- 
get rescrambles  the  puzzle  and 
starts  a  new  game.  The  other  gad- 
gets (front/back,  the  move  bar,  and 
dose  window)  are  all  active  as  usual. 
As  a  final  touch,  the  Puzzle 
window  displays  the  elapsed  time 
and  number  of  moves  since  the 
start  of  the  game. 

How  It  Works 

Amiga  Puzzle  was  adapted  from  a 
similar  puzzle  game  available  on 
the  Macintosh,  Those  of  you  famil- 
iar with  Microsoft  BASIC  2.0  on  the 
Macintosh  will  immediately  see 
many  similarities  in  Amiga  BASIC. 
In  fact,  many  Macintosh  BASIC 
programs  can  be  converted  to 
Amiga  BASIC  with  litde  effort. 
Both  languages  support  windows, 
pull-down  menus,  labels,  many 
types  of  graphics  commands,  and 
other  features. 

Amiga  Puzzle  is  divided  into 
seven  subroutines  named  Done, 
Init,  DrawScreen,  Mix,  Play, 
CheckCheat,  and  More.  There  are 


also  two  small  subprograms.  Talk 
and  Position.  Here  are  descriptions 
of  what  these  subroutines  do: 

Init:  initializes  variables,  user- 
defined  functions,  and  loads  the 
puzzle's  characters  A-0  into  the 
two-dimensional  array  cO. 

DrawScreen:  displays  the  puz- 
zle's squares  and  characters. 

Mix:  mixes  only  adjacent 
squares  and  keeps  track  of  the 
blank  square's  position  in  variables 
blankX  and  blankY. 

Play:  the  main  subroutine 
where  the  current  mouse  position  is 
compared  to  coordinates  of  each 
square  stored  in  the  three- 
dimensional  array  rat. 

CheckCheat:  makes  sure  the 
attempted  move  is  a  legal  one  {ad- 
jacent squares  only,  no  diagonal 
moves). 

More:  checks  if  the  mouse  is 
clicked  on  the  plus-sign  gadget  in 
Amiga  Puzzle's  lower-right  comer. 
If  so,  the  program  starts  a  new 
game  by  jumping  back  to  Start. 

Done:  ends  the  program  and 
returns  control  to  BASIC. 

Special  Features 

Most  of  the  program  is  standard 
Microsoft  BASIC.  The  only  lines 
that  merit  special  attention  are  the 
user-defined  functions  in  the  Init 
subroutine.  One  function  operates 
the  puzzle's  timer,  and  the  other 
determines  if  the  puzzle  has  been 
solved, 

A  quick  way  to  time  any  event 
is  to  define  a  function  that  subtracts 
the  current  time  from  the  initial 
starting  time.  This  is  done  with  the 
function  FNlaps,  The  current  time 
is  obtained  from  TIMER  and  the 


May  1986     COMPUTH      79 


initial  time  stored  in  the  variable 
starttime. 

The  other  defined  function, 
FNwin,  determines  if  the  puzzle 
has  been  solved  by  comparing  the 
letter  in  each  tile — stored  in  the 
array  cQ — with  the  characters  A-0. 
Each  letter  in  the  correct  position 
returns  a  value  of  —1  (true).  So  the 
puzzle  has  been  solved  w^hen  all  15 
letters  are  sorted,  returning  a  value 
of  -15. 

A  very  pov/erfui  feature  of 
Amiga  BASIC  is  its  subprogram  ca- 
pability (see  "Requester  Windows 
in  Amiga  BASIC,"  COMPUTE!, 
March  1986).  In  effect,  subpro- 
grams let  you  add  new  commands 
to  the  language.  The  word  TALK  is 
not  a  command  in  Amiga  BASIC, 
but  has  been  added  to  Amiga  Puz- 
zle as  a  subprogram.  It  lets  you 
execute  both  a  SAY  command  and 
the  text-to-speech  TRANSLATES 
function  by  simply  typing  TALK 
followed  by  the  desired  string.  Sim- 
ilarly, POSITION  is  a  subprogram 
that  expects  parameters  of  the  X 
and  Y  coordinates  as  the  location  to 
PRINT  the  desired  string. 

Program  2,  "Makelcon,"  lets 
you  create  a  special  icon  for  Amiga 
Puzzle.  This  is  optional,  of  course, 
since  Amiga  BASIC  automatically 
assigns  a  standard  icon  when  you 
save  the  program.  Makelcon  re- 
creates the  special  icon  1  designed 
with  the  Amiga's  Icon  Editor  (a  new 
feature  that's  included  with  the  free 
upgrade  to  version  1.1  of  the  oper- 
ating system).  The  icon  data  is  con- 
verted from  the  hexadecimal  values 
in  the  DATA  statements  into  single- 
byte  values  and  stored  in  the  file 
Puzzle. info  (all  Amiga  icon  files  end 
vrith  .info).  In  addition  to  the  icon's 
shape  and  color,  the  special  data 
also  contains  information  that 
makes  Amiga  BASIC  the  program's 
default  tool.  That  means  when  the 
icon  is  clicked  on  the  Workbench 
screen,  Amiga  BASIC  is  automati- 
cally loaded  and  run  prior  to  load- 
ing and  running  the  game. 

Multitasking  With  BASIC 

Since  multitasking  is  built  into  the 
Amiga's  operating  system  as  a  stan- 
dard feature,  no  special  program- 
ming techniques  are  required  to 
write  a  BASIC  program  that's  capa- 
ble of  running  simultaneously  with 
other   tasks.    Feel    free    to    move 


Amiga  Puzzle  over  or  under  other 
windows  running  different  pro- 
grams without  causing  interfer- 
ence. If  your  computer  has  at  least 
512K  RAM,  you  can  even  chck  on 
the  Amiga  Puzzle  icon  a  second 
time  and  run  two  of  the  games  at 
once. 


Program  1:  Amiga  Puzzle 

start: - 

GOSUB  imt- 

GOSXJB  DrawScreen- 

QOSUB  Mix- 

WHILE  WI1TDOWC7)<>0- 

QOSUB  Play- 

WBND- 

Done;^ 

BEEPiWINDOW  CLOSE  2:WrND0W  1*- 

EISTD- 

Inlt:- 

DEFINT  a-z- 

Talk  "  "  - 

WIWDOW   l,"Puzzle",(230,46)-(230-l- 13 

8,45-(-96),30- 

tries  =  0:HAlirDOMIZE  TIMER- 

FOR  y"0  TO  3- 

FOH  x  =  0  TO  3- 

o(x,y)=x-l-y*4-l-ASC("A") '  Load  charao 

ters- 

NEXT  X- 

MDXT  y- 

TjlankX =x-l  :blaii!5:Y= y-1- 

cO)lan]£X,DlankY:»=ASCC"     "> 

DEF  FNlapal  -  ((TIMER-starttime!)  \  60) 

+  (((TIMBR-Btarttlmel)  MOD  60)/100)- 

DEF   FHa  -  (c(0 ,0)  =  66)  +  (0(1 ,0)  -  66)  +  ( 

0(2, 0)  =  67) -I- (c(3,0)  =  68)- 

DEF  FNT3  =  (0(0,1)  =  69) +  (0(1,1)  =  70) +  ( 

c(S,l)  =  71)-l-(o(3,l)  =  72)- 

DEF  FNo  =  (0(0,2)  =  73)  +  (o(l,2)  =  74)  +  (c 

(2,2)  =  76)-l-(c(3,2)  =  76)- 

DEF  FNd  =  Cc(0,3)  =  77)  +  (o(l,3)=78)  +  ( 

0(2,3)  =  79)  -t-  (0(3,3)  =  80)- 

DEF    FNwlii  =  (FNa-l-Firb  +  FK'o  +  FNd 

)  'Won  if  =  -16- 

HETtmU- 

DrawScreen;- 

FOE  y  =  0  TO  3- 

FOR  x  =  0  TO  3- 

PoBltion   (x+i)*3,(y-l-l)'2,CHH$(o(x,y 

))  '  Print  oliaracters- 

xl  =x*30+  10;yl  =y*18-h3  '  Draw  boxes 

LINE  (xl,yl)-(xl+30,yl-l-18),l,"b- 

LINE(xI-I,yl-l)-(xl-f30+l,yl-(-18-l-l) 

,l,b- 

LINE  (10-8,3-3)-(4*30  -H 10  +  6,4*18  -t-  3  + 

3),l,ti- 

moreX = 128:moreY =89- 

LINE  (moreX,moreY)-(moreX  +  10,more 

Y+IO),l,bf  >- 

PoBltlonl4,ll,"-l-"'H'ew  game  gadget- 

rat(x,y,D)  =  xl:rat(x,y,l)=yl- 

WEXT  X- 

NEXT  y- 

Position  3,10, "TIME  0.00"  •- 

Position  3,11, "TRIES  0"- 

RBTtrRH- 

Mix:- 

X  =  blaiiicX:y = blantY- 

FOR  mixing=333  TO  1  STEP  -1  - 

IF  (mixing  AND  1)  =  0  THEN- 


x=INT(HinD*4):y=blani;Y  '  Bven- 
ELSE  - 

y=IIirT(RIinD*4):x=blaiikX  '  Odd- 
END  IF- 

QOSUB  CheckCheat- 
NBXT  mixing- 
Talk  "Ready.  "- 
Btarttimel  =  TIMER- 
HE  TtJHN- 
Play:- 

LOCATE  10,8:PRQrT  USINQ  "»#.*#";FN1 
apal;- 

WHILE  MOIISE(0)<>0- 
mouseX = M0UBE(3)  imouea  Y= M0U3B( 
4)- 

FOR  y  =  0  TO  3- 
FOR  x  =  0  TO  3- 

IF  (mouseX>rat(x,y,0)  AND  mo'useX<r 
at(x,y,0)+30)  AITO  (mou6eY>rat(x,y,l 
)  AND  ino-useY<rat(x,y,l)-!-18)  THE 
N  GOSUB  ClieckClieat:RKTUHN- 
NEXT  X- 
NBXT  y- 
GOSFB  More- 
WBBn- 
RETURN- 
CheckCtLeat:- 

IF  (ABS(x-tilankX)>l  OR  ABS(y -blank Y) 
>1)  OR  ((xoblankX  AND  yoblankY) 
)  THEN- 

IF  mixing =0  THEN  Talk  "Glieater."  'Gh. 
eatlng- 

ELSE  'Not  cbeating- 
3WAP  o(x,y),c(blanfcX,blankY)- 
Position(x-f-l)'3,(y-l-l)'2,CHH$(o(x,y)) 

SWAP  x,blankX:SWAP  y,UlankY- 
Position  (x+  l)*3,(y-l-l)*2,CHR$(o(x,y)) 

END  IF- 

IF  mixing  =  0  THEN- 
tries = trlea-fl- 
LOCATE  11,8:PRINT  trieB;- 
WHILE  MOUSE(0)<>0:WEND- 
IF  FNwln  = -15  THEN  TaUc  "We  have  a  wl 
nner.":aOT0  More- 
END  IF- 
RETTJHN- 
More:- 

WHILE  MOUSE(0)<>0  ORrNwin=-lB  'A 
nother  game?- 

mouseX = M0TJ3E(3):mou8eY=  M0TJ8B( 
4)*- 

IF  MOU3E(0)  =  0  AND  (mouseX>more 
XANDmouseX<moreX+10)AlID  (mou 
eeY>moreY  AND  mouaeY<moreY-t-10 
)  THEN  GOTO  Start- 
IF  WINDOW(7)  =  0  THEN  Done- 
WBND- 
RETORN- 

STTB  Talk(a»)  STATIC- 
SAY  TRANSLATE$(a*)- 
END  SUB- 
SUB  Posltlon(x,y,a6)  STATIC- 
LOCATE  y,x:PRINT  aS;- 
END  3UB- 

Program  2:  Makelcon 

WIDTH  60- 

PRINT:PRINT  SPG(20);  "Creating  Puzzl 

6  Ioon":PRINT  - 

DEFINT  a-Z- 

CLOSE- 

OPEN  "Puzzle.lnfo"  FOR  OUTPUT  A3  2- 

FOR  ii  =  l  TO  98- 

HEAD  longS- 


80     COMPUTEI     May  1986 


FOR  i  =  l  TO  8  STEP  S- 
byte$  =  MIDS(longS,i,3)- 
PRINT  byte$r 
HX  byte$- 
tmp  -  VALCbyteS)- 
oheokaum  =  che  ckaum  +  trnp*- 
PRINT  #3,CHRS(tmp);- 
STEXT  i- 
NEXT  11- 
CLOSE- 
KILL  "Puzzle. Info. info"  'Delete  loon's  ic 
on- 

Ijr  checksumo  12063  THEN  BEEPiPHI 
MT:PRINT  "Error  In.  data  statements."- 
END- 

SUB  HX(a$)  STATIC '  3TR8  hex  to  dec  (m 
ax=FFFF)- 

aS=TJCASB«(a8):ii=0;an8=0  - 
FOR  i=l  TO  LEN(aS)- 
c=»A3CCMIDS(a$,i,l))- 
n  =  VAl(CHR$(c))- 

IF    0>ASC("9")    THEH    n  =  (VAl(CHR«( 
c-17)))  + lo- 
ans =aas*16+n- 
NEXT  1- 
a$  =  STR$(ans)- 
END  STTB- 
'  Puzzle  Icon  data- 

DATA  E3100001,00000000,Ooa0006S,0 
0380017  - 

DATA  00040005,00010001,B8COOOOO,0 
0000000  - 

DATA    00000000,00000000,00000000,0 
0000000  - 
DATA  044C0001,B6FOOOOO,00000000,0 

orcoooo- 

DATA   00560000,00000000,00000000,1 

0000000- 

DATA   00000088,00170008,00081600,0 

3000000- 

D ATA  00000000,00000000 , SFFFFFFI' ,F 

G003000- 

DATA  00000400,27FFFFFF,E4002404,0 

8102400- 

DATA    24040810,34002404,08102400,2 

7FFFFFF- 

DATAE40034ie,7BOF2400,243C3319,A 

400243G- 

DATA  33302400,37663E30,E400347E,3 

3502400- 

DATA  24C33319,A40084C3,7EOF2400,2 

7FFFFFF- 

DATA   E4002404,08108400,34040810,3 

4002404- 

DATA  0810S400,87FFFFFF,E4002000,0 

0000400- 

DATA  3FFFFFPP,PC000O0O, 00000000,0 

0000000- 

DATA   00000000,00000000,00000000,0 

0000000- 

DATA    00000000,00000000,00000000,0 

0000000- 

DATA   00000000,00000000,00000000,0 

0000000- 

DATA   00000000,00000000,00000000,0 

0000000- 

DATA    00000000,00000000,00000000,0 

0000000- 

DATA   00000000 ,00000000, 00000000,0 

0000000- 

DATA  00000000,00000000 , 00000000 ,0 

0000000- 

DATA    00000000,00000000,00000000,0 

0000000- 

DATA  00000000,00OOO000,000C3A41 ,6 

D698761- 

DATA  42416349,43000000-  © 


DEBUT 

Atari  BASIC 
Debugging  Tooi 


Gary  W,  Swan  berg 


Here's  a  powerful  debugging  utility 
that  lets  Atari  BASIC  programmers 
analyze  and  manipulate  variables, 
search  for  BASIC  keywords,  produce 
printed  documentation  of  important 
program  information,  and  call  up  disk 
directories  without  leaving  BASIC.  It 
works  on  all  Atari  400/800,  XL,  and 
XE  computers  with  at  least  40K  RAM, 
a  disk  drive,  and  Atari  DOS  2.0  or  2.5. 


"DEBUT,"  a  utility  for  debugging 
Atari  BASIC  programs,  was  in- 
spired by  the  "Atari  Wedge"  (COM- 
PUTE!, December  1982).  It  uses  the 
Wedge  technique  to  provide  BASIC 
with  direct-mode  commands  for 
listing  and  locating  variables, 
dumping  variable  values,  and  re- 
placing one  variable  with  another. 
It  also  searches  for  BASIC  key- 
words and  includes  a  DIR  com- 
mand for  listing  the  disk  directory. 
Output  is  easily  redirected  from  the 
screen  to  the  printer,  disk  drive,  or 
any  other  output  device.  And  be- 
cause DEBUT  is  written  in  machine 
language,  it  remains  completely 
transparent — BASIC  programs  can 
be  loaded,  modified,  tested,  and 
saved  without  interference. 


Preparing  DEBUT 

The  program  followdng  this  article 
creates  DEBUT  as  an  AUTO- 
RUN. SYS  file  that  runs  with  two  of 
the  three  revisions  of  Atari  BASIC 
(revisions  B  and  C).  If  PRINT 
PEEK(43234)  returns  162,  then  you 
have  revision  A,  in  which  case  you 
must  substitute  the  following  lines 
for  the  corresponding  lines  in  Pro- 
gram 1: 

200  DATA  255,255,0,31,157,31,175,164, 

41,168 
202  DATA  76,98,164,76,144,164,76,92,181, 

76 
204  DATA  12,181,76,53,181,76,159,186,76, 

137 
206  DATA  171,76,188,175,76,155,171,68,69, 

66 
(Revision  A  is  the  original  BASIC 
cartridge  made  for  the  400/800  and 
1200XL  computers.  Revision  B  is 
the  BASIC  buUt  into  the  600XL  and 
800XL.  Revision  C  is  built  into  the 
65XE  and  130XE  and  also  is  avail- 
able as  a  cartridge  from  Atari.) 

Type  in  and  save  the  BASIC 
program,  then  insert  the  disk  on 
which  you  want  to  create  DEBUT's 
AUTORUN.SYS  file  and  type 
RUN.  Make  sure  an  AUTO- 
RUN.SYS file— such  as  Atari 
SpeedScript  or  SpeedCalc — doesn't 
already  exist  on  the  disk  or  it  will  be 
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replaced.  After  the  AUTORUN.SYS 
file  is  created,  you  won't  need  to 
run  the  BASIC  program  again,  ex- 
cept to  create  copies  of  DEBUT  on 
other  disks.  To  start  DEBUT,  turn 
the  computer  off,  make  sure  a  disk 
with  the  DEBUT  AUTORUN.SYS 
file  is  in  the  drive,  then  turn  the 
computer  on.  DEBUT  loads  auto- 
matically and  announces  its  pres- 
ence with  the  message  DEBUT. 
This  message  appears  whenever 
you  press  SYSTEM  RESET,  re- 
minding you  that  DEBUT  is  active. 

DEBUT  protects  itself  by  reset- 
ting MEMLO  (the  pointer  to  the 
bottom  of  free  memory,  locations 
743  and  744)  and  by  trapping  the 
DOS  command.  As  in  the  Atari 
Wedge,  typing  KILL  gets  rid  of  the 
utility  and  enables  DOS. 

Note:  DEBUT  works  with  Atari 
DOS  2.0  and  2.5,  but  may  not  work 
with  other  types  of  DOS,  especially 
after  a  SYSTEM  RESET.  Be  sure 
that  you  have  one  of  these  versions 
before  typing  in  the  program. 

Using  DEBUT 

Once  DEBUT  is  up  and  running, 
you  have  four  new  commands  at 
your  disposal  for  debugging  and 
documenting  BASIC  programs — 
plus  the  DIR  command.  You  type 
the  command  and  press  RETURN, 
just  as  you  would  with  any  direct- 
mode  BASIC  statement.  Type  DIR, 
for  example,  to  list  the  disk  directo- 
ry, or  use  the  form  DIR  D:filespec  to 
list  specific  files.  The  ?  and  *  wild- 
card characters  are  allowed,  and 
drive  numbers  (D2:,  D3:,  etc.)  can 
be  specified  as  well.  (D:  defaults  to 
drive  1.) 

Now  you're  ready  to  load  one 
of  your  BASIC  programs  and  try 
the  four  main  commands: 

FIND     (Find  a  variable  or  BASIC 

keyword.) 
REP       (Replace  one  variable  with 

another.) 
XREF     (list  variables  and  ooss-reference 

line  numbers.) 
VIEW    (View  the  values  of  all  variables.) 

These  commands  act  on  your 
entire  BASIC  program  unless  you 
specify  a  range  of  line  numbers 
using  the  form  starting  Unejast  line. 
You  may  specify  either  or  both. 
When  specifying  only  the  last  num- 
ber, precede  it  with  a  comma,  or 
DEBUT  thinks  it's  a  starting  num- 
ber. The  line  range  parameter  is 


optional,  so  it  follows  the  other  ar- 
guments to  the  command,  as  we'll 
explain  below. 

All  commands  can  also  use  the 
output  switch — a  slash  appended  to 
the  command  followed  by  the 
name  of  the  device  to  which  you 
want  to  redirect  output  (P  for  Print- 
er, D  for  Disk,  C  for  Cassette,  etc.). 
This  sends  the  command's  output 
to  the  device  rather  than  to  the 
screen.  To  send  the  disk  directory 
listing  to  the  printer,  for  example, 
type  DIR/P.  This  option  uses  chan- 
nel 1  for  output,  closing  the  channel 
when  it's  done.  Files  created  on 
disk  or  cassette  are  ASCII  files 
which  can  be  viewed  with  most 
Atari  word  processors  or  ENTERed 
into  memory  with  BASIC. 

We'll  see  more  examples  as  we 
take  a  detailed  look  at  each 
command. 

The  FIND  Command 

With  FIND,  you  can  quickly  identi- 
fy any  lines  in  your  program  that 
contain  a  certain  variable  or  BASIC 
keyword.  Here  is  the  general  format: 

FIND  [/output  device]  target  [starting 
linejast  line] 

where  /output  device  is  the  optional 
switch  for  redirecting  output  from 
the  screen;  target  is  the  variable 
name  or  BASIC  keyword  you  want 
to  find;  and  starting  linejast  line  is 
the  optional  line  number  range  for 
the  search. 

FIND  lists  every  line  in  which 
the  target  appears.  The  target  can 
be  a  statement  name  (keywords 
that  begin  a  statement,  such  as 
PRINT,  PLOT,  and  POKE),  a  func- 
tion name  (such  as  RND,  COS,  and 
PEEK),  or  a  variable  name.  Include 
the  right  parenthesis  as  part  of  sub- 
scripted variable  names,  and  the 
dollar  sign  as  part  of  string  variable 
names.  (Remember:  X,  X(,  and  X$ 
are  three  distinct  variables.) 

FIND  does  not  locate 
keywords  that  are  neither  state- 
ments nor  functions — THEN  and 
TO,  for  instance.  GOSUB  and 
GOTO  are  missed  when  they  ap- 
pear as  part  of  the  ON-GOSUB  or 
ON-GOTO  statements.  Also,  FIND 
won't  locate  any  operators,  such  as 
OR,  AND,  +,  and  /,  to  name  a  few. 

FIND  does  locate  ERROR  lines, 
however;  use  FIND  *  for  this 
purpose. 


Directing  output  to  the  disk 
drive  (FIND/D:/(7ef!flme)  presents 
an  interesting  possibility — the  file 
thus  created  can  later  be  retrieved 
using  BASIC'S  ENTER  command, 
allowing  you  to  sift  lines  out  of  one 
program  to  create  another. 

Perhaps  you've  discovered 
that  keywords  can  sometimes  be 
used  as  variable  names  in  Atari 
BASIC.  FIND  assumes  that  if  it's 
spelled  like  a  keyword,  it  is  a  key- 
word. You  can  force  FIND  to  search 
for  variables  only  by  preceding  the 
variable  name  with  the  greater- 
than  symbol  (>).  Thus,  FIND  LEN 
comes  up  with  all  occurrences  of 
the  LEN  funcrion,  while  FIND 
>LEN  lists  occurrences  of  a  variable 
called  LEN.  This  option  is  needed 
only  if  your  target  variable  could  be 
confused  with  a  keyword.  (Be  care- 
ful when  choosing  variable  names 
in  Atari  BASIC.  LET  NOTE  =  66 
creates  a  legitimate  variable,  but  if 
you  try  to  access  its  value — for  ex- 
ample, SOUND  0,NOTE,10, ID- 
BASIC  treats  it  as  NOT  E,  while 
FIND,  without  the  >  option,  would 
go  off  looking  for  the  keyword 
NOTE.) 

When  you  specify  a  line  num- 
ber range  with  the  FIND  command, 
only  those  lines  within  that  range 
are  listed.  Here  are  some  examples: 
FIND  X( 

(List  all  lines  in  the  program  con- 
taining the  array  variable  X.) 
FIND  TEMP  100 

(List  all  lines  containing  the  vari- 
able name  TEMP,  beginning  at  line 
100.) 
FIND/P  CHRS,IOO 

(List  all  lines  through  line  100  con- 
taining   the    function    CHR$    and 
send  the  listing  to  the  printer.) 
FIND  •  100,200 

(List  all  lines  from  100  through  200 
that  contain  ERRORs.) 
FIND/D:NEWFILE.ASC  PRINT,20000 

(Create  a  disk  file  named  NEW- 
FILE. ASC  to  hold  the  listing  of  all 
lines  through  line  20000  that  con- 
tain the  keyword  PRINT.) 

The  XREF  Command 

As  you  write  an  Atari  BASIC  pro- 
gram, newly  declared  variables  are 
added  to  an  area  of  memory  called 
the  variable  name  table.  XREF  lists 
the  contents  of  this  table  and  cross- 
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references  the  lines  in  which  each 
variable  appears.  Here  is  the  gener- 
al format: 

XREF  [/output  demce]  [starting  line,iast 
line] 

where  /output  device  is  the  optional 
switch  for  redirecting  output  from 
the  screen;  and  starting  Unejast  line 
is  the  optional  line  range  parameter. 

Often,  XREF  finds  variables  in 
the  variable  name  table  that  don't 
actually  appear  in  your  program. 
You  can  recognize  these  unused 
variables  because  XREF  lists  them 
with  no  line  number  references. 
Unused  variables  can  happen  when 
you  delete  all  occurrences  of  a  cer- 
tain variable  from  a  program,  or 
when  you  misspell  a  variable  or 
command  and  BASIC  thinks  you're 
creating  a  new  variable.  These  un- 
used variable  names  clutter  up  the 
variable  name  table,  which  might 
become  a  factor  in  a  long  program 
since  the  table  is  limited  to  128 
names. 

XREF  can  help  you  eliminate 
this  deadwood.  If  a  large  number  of 
unused  variables  show  up,  you  can 
clear  them  out  by  LISTing  the  pro- 
gram to  disk,  typing  NEW,  and 
then  re-ENTERing  the  program. 
(LIST  and  ENTER  reconstruct  the 
variable  name  table,  whereas  SAVE 
and  LOAD  preserve  it.) 

When  you  specify  a  line  num- 
ber range  with  XREF  (for  instance, 
XREF  1000,2000),  only  those  vari- 
ables and  line  references  within 
that  range  are  listed.  At  the  foot  of 
the  listing,  both  the  count  of  listed 
variables  and  the  total  number  of 
variables  in  the  name  table  are 
displayed. 

XREF/P  creates  a  hardcopy  of 
the  variable  listing — useful  docu- 
mentation. XREF  also  makes  it  easy 
to  spot  misspelled  variable  names. 
No  longer  must  you  trace  through  a 
recalcitrant  program  line  by  line 
only  to  find  that  your  mysterious 
bug  is  due  to  the  slip  of  a  finger. 
And  if  you're  as  poor  a  typist  as  I 
am,  you'll  be  making  frequent  use 
of  the  REP  command  described 
below. 

Here  are  a  few  examples: 
XREF 

(List  and  cross-reference  all  vari- 
ables in  the  program.) 
XREF  2000,2999 

(List  and  cross-reference  all  vari- 


ables in  the  subroutine  in  lines  2000 
through  2999.) 

XREF  ,10000 

(List  and  cross-reference  all  vari- 
ables up  to  line  10000.) 
XREF/D:VARLIST 

(List  and  cross-reference  all  vari- 
ables in  the  program,  and  send  the 
list  to  the  disk  file  VARLIST.) 

The  REP  Command 

Now  it's  easy  to  replace  those  cryp- 
tic variable  names  with  new  names 
of  crystal  clarity — or,  depending  on 
your  motives,  vice  versa.  REP  acts 
in  a  flash,  replacing  old  variable 
names  with  new  variable  names. 
It's  handy  for  making  corrections 
and  tightening  up  code — but  be 
careful.  With  or  without  such  a 
command,  the  more  ambitious  your 
program,  the  wiser  it  is  to  save 
backup  copies  and  document 
changes  as  you  make  them. 
Here  is  the  general  format: 

REP  [/output  device]  oldvar  newvar 
[starting  line,last  line] 

where  /output  device  is  the  optional 
switch  for  redirecting  output  from 
the  screen;  oldvar  is  the  old  variable 
name;  newvar  is  the  new  variable 
name  (separated  by  a  space,  not  a 
comma,  from  oldvar);  and  starting 
Unejast  line  is  the  optional  line 
number  range.  (The  only  output 
produced  by  the  output  svntch  is  a 
message  telling  you  how  many 
variables  were  changed.) 

REP  does  not  let  you  replace 
keywords  or  mismatched  variable 
types  (for  instance,  you  can't 
change  A$  to  A).  Also,  REP  requires 
that  the  new  variable  already  exists  in 
the  variable  name  table.  To  add  a 
new  variable  to  the  table,  simply 
use  it  in  any  BASIC  statement,  even 
in  direct  mode,  (If  you  want  to  cre- 
ate a  new  variable  SUM,  for  in- 
stance, you  can  just  type  SUM=0 
and  press  RETURN.) 

If  you  don't  include  the  option- 
al line  number  range,  REP  works  on 
the  entire  program.  If  you  specify  a 
range  of  lines,  it  replaces  the  old 
variable  name  only  within  those 
lines.  Watch  out  for  this,  since  it 
may  cause  a  conflict  elsewhere  in 
your  program. 

Here  are  some  examples: 
REF  CB  CHECKBALANCE 

(Replace  all  occurrences  of  the  vari- 
able  CB   with   the   new   variable 


name  CHECKBALANCE.) 
REP  CLIENTNAMES  CN$ 

(Replace  all  occurrences  of  the  vari- 
able CLIENTNAME$  with  the  new 
variable  name  CN$.) 
REP  I(  INDEX( 

(Replace  all  occurrences  of  the  ar- 
ray variable  I()  with  the  array  vari- 
able INDEXQ.) 
REP  SUM  TOTAL  3000,3999 
(Replace  all  occurrences  of  the  vari- 
able SUM  with  the  new  variable 
name  TOTAL  within  the  subrou- 
tine in  lines  3000  to  3999.) 

Variables  are  stored  as  one- 
byte  tokens  in  Atari  BASIC.  REP 
looks  up  the  old  and  new  variable 
names  in  the  name  table  to  deter- 
mine their  tokens,  then  replaces  ev- 
ery old  token  (within  range)  with 
the  new  one.  The  old  name  remains 
in  the  name  table  (type  XREF  to  see 
for  yourself)  and  keeps  the  value  it 
had  at  the  time  of  the  change. 

The  VIEW  Command 

BASIC'S  PRINT  statement  lets  you 
examine  variable  values  in  direct 
mode  as  you  test  and  debug  a  pro- 
gram, but  it  can  be  cumbersome 
when  you're  juggling  lots  of  vari- 
ables, especially  subscripted  vari- 
ables. Of  course,  there's  an  easier 
way. 

DEBUT'S  VIEW  command  lists 
all  variables  and  their  values,  in- 
cluding strings  and  arrays,  without 
requiring  you  to  name  each  one. 
Type  VIEW  to  quickly  display  the 
values,  or  use  the  optional  output 
switch  to  generate  hardcopy  that 
you  can  analyze  with  the  proverbial 
fine-toothed  comb. 

Here  is  the  format  of  the 
command: 

VIEW  [/output  device]  [starting  Unejast 
line] 

where  /output  device  is  the  optional 
switch  for  redirecting  output  from 
the  screen;  and  starting  Unejast  line 
is  the  optional  range  of  line  numbers. 
Here  is  the  format  of  the  VIEW 
command's  output: 

VARIABLE  ~t>fiiac 

STRINGS  current  iength,maximum  length 

"string  contents" 

ARRAY(rcrn;s,co/s 

10  20  30  40 

2468 

3  5  711 

Scalar  variable  values  are  dis- 
played in  a  pretty  straightforward 
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manner — the  variable  name  is  fol- 
lowed by  its  value.  Strings  are  listed 
with  additional  information — the 
current  and  maximum  length. 
String  contents  are  printed  in 
quotes  below  the  name. 

For  subscripted  variables, 
VIEW  lists  the  row  and  column  di- 
mensions corresponding  to  the  in- 
dexes you  assign  with  the  DIM 
statement,  plus  one.  {Because  in- 
dexing starts  at  zero— ARRAY(0,0) 
is  a  valid  array  element — the  actual 
size  of  each  dimension  is  one 
greater  than  the  value  you  give.) 
Values  are  listed  by  column  and 
row;  sample  values  are  shown  in 
the  example  above.  A  singly  sub- 
scripted variable  is  really  a  one- 
column  array;  its  values  are  listed 
vertically.  If  a  string  or  array  has 
not  been  dimensioned,  only  the 
name  prints.  Unused  variables 
aren't  listed  at  all. 

The  output  switch  and  range 
option  work  with  this  command  as 
they   do   with   all   others.    For 
example: 
VIEW/P 

(Prints  a  hardcopy  of  all  the  vari- 
ables and  their  values.) 
VIEW/P  200,300 

(Prints  a  hardcopy  of  the  variables 
and  values  in  lines  200  through 
300.) 

Additional  Hints 

The  DEBUT  commands  are  an  aid 
to  debugging,  but  they  won't  do  the 
whole  job  for  you.  Use  them  along 
with  other  techniques  (such  as  trac- 
ing the  program's  execution  with 
temporary  PRINT  statements)  to 
close  the  gap  between  what  you're 
telling  BASIC  to  do,  and  what  you 
want  it  to  do. 

Since  the  optional  disk  output 
produced  by  these  commands  is 
compatible  with  any  word  proces- 
sor that  handles  ASCII  text,  you  can 
easily  produce  program  documen- 
tation with  DEBUT.  For  example, 
you  could  save  the  XREF  listing  to 
disk,  and  use  a  word  processor  to 
add  explanations  of  each  variable. 
Every  minute  spent  documenting  a 
program  pays  off  threefold  should 
you  ever  have  to  go  back  and  modi- 
fy it. 

The  DEBUT  command  formats 
are  tolerant  of  extra  spaces,  and 
command  words  can  be  abbreviat- 


ed— just  type  the  first  letter  fol- 
lowed by  a  period.  In  fact,  the 
period  alone  is  all  you  need  for  DIR. 
The  output  switch  is  unaffected  by 
abbreviations — DIR/P,  D./F,  and 
./P  all  do  the  same  thing.  In  addi- 
tion, the  FIND  command  accepts 
abbreviated  keywords  as  its  target. 
For  example,  FIND  FOR,  FIND  P., 
and  F.F.  all  seek  out  the  keyword 
FOR.  Sound  confusing?  Experi- 
ment. You'll  find  the  shortcuts 
which  are  most  useful  to  you. 

Notes  For  IML  Programmers 

It  would  be  nice  if  DEBUT  had  a 
renumbering  command,  program 
trace  capabilities,  or  even  a  few 
more  DOS  commands.  Machine 
language  programmers  can  add 
such  new  commands  by  patching 
entries  into  DEBUT's  command  ta- 
ble, which  reserves  25  bytes  for  just 
this  purpose. 

A  command  table  entry  con- 
sists of  your  machine  language  rou- 
tine's address  minus  one,  followed 
by  the  command  name.  The  ad- 
dress is  stored  in  high  byte/low 
byte  order.  The  command  name  is 
in  ASCII  code  exactly  as  you'd  type 
it,  except  that  the  rightmost  byte 
must  have  the  most  significant  bit 
on  (inverse  video).  Add  entries 
starting  at  location  8149  (hex 
$1FD5),  but  don't  use  more  than 
the  25  bytes  or  you'll  overwrite  DE- 
BUT. Your  code  can  be  appended  to 
the  DEBUT  AUTORUN.SYS  file  by 
using  the  DOS  copy  with  append 
feature. 

DEBUT  does  some  preprocess- 
ing before  your  routine  gets  control. 
As  a  result,  you'll  be  able  to  abbre- 
viate your  commands,  with  DEBUT 
abbreviations  taking  precedence. 
The  output  switch  works  as  well, 
opening  channel  1  to  the  output 
device  and  storing  the  channel 
number  at  location  181  ($B5)  before 
branching  to  your  routine.  If  the 
command  line  requires  further 
parsing,  your  routine  will  find  it  at 
location  1408  ($580);  the  offset  to 
the  first  argument  (if  any)  will  be  in 
location  242  ($F2).  Your  machine 
language  routine  should  end  with 
an  RTS  instruction  if  you  wish  it  to 
return  through  DEBUT  to  BASIC. 

DEBUT  calls  on  several  rou- 
tines in  Atari  BASIC  and  accesses 
various  BASIC  tables  whose  ad- 
dresses have  changed  in  the  later 


releases,  which  accounts  for  the 
slightly  different  version  of  the  pro- 
gram for  BASIC  revision  A.  DEBUT 
commands  will  not  trigger  the  noto- 
rious lockup  bug  of  revision  A  and 
(especially)  revision  B.  For  those 
with  an  interest  in  the  inner  work- 
ings of  Atari  BASIC,  I  highly  rec- 
ommend The  Atari  BASIC  Source 
Booli  (COMPUTE!  Books),  as  well  as 
the  aforementioned  "Atari  Wedge" 
article  by  Charles  Brannon  (reprint- 
ed in  COMPUTEI's  Third  Book  of 
Atari  as  "The  Wedge:  Adding  Com- 
mands to  Atari  BASIC"). 

DEBUT:  Atari  BASIC 
Debugging  Tool 

For  instructions  on  entering  this  listing,  pieose 
refer  to  "COMPUTEI's  Guide  to  Typing  In 
Programs"  in  this  issue  of  COMPUTE!, 

CF10  ?  "INSERT  DISK  -  PRESS 

I-A^itj-A:     WHEN  READY" 
HS  20  IF  PEEK(764)  <  >12  THEN 

20 
FC30    OPEN  #1  ,  a,  0,  "DiflUTORUN 

,  SYS" 
CO  40  ?  "CREATING  DEBUT  AUTO 

RUN.SYB  FILE" 
«50  FOR  1  =  1  TD  1304:REfiD  B 
YTE:PUT  #1,BYTE:NEXT  I 
£1(60  7  "AUTORUN.SYS  CREATED 

":END 
81170  DATA  255,255,0,31,157, 

31  ,  159,  164,36,  168 
CJ  80  DATA  76,  B4,  164,  76,  130, 

164, 76, 142, 1B1,76 
Ff90  DATA  62,  IBl  ,  76,  103,  lai 

, 76, 153, 1B6, 76, 129 
6D  100  DATA  171,76,167,175,7 

6, 147, 171 , 68, 69,66 
BKlia  DATA  85,84,155,53,46, 

48, 155, 165, 12,141 
Ni;i20  DATA  86,31,165,13,141 

,87,31 , 169, 0,141 
DL  130  DATA  241,31,169,85,13 

3, 12, 169,31, 133, 13 
60  140  DATA  160,31,169,31,32 

, 3, 36, 32, 91,31 
(n  150  DATA  169,46,141,231,2 

,  169,  36,  141 , 232, 2 
!J  160  DATA  96,32,88,31,76,5 

1,31, 160, 0, 185 
PI  170  DATA  26,3,201,69,240, 

8, 200, 200, 200, 192 
EL  180  DATA  34,208,242,96,20 

0, 169, 158, 153, 26, 3 
06190  DATA  169,31,153,27,3, 

162, 15, 189, 0,228 
HF  200  DATA  157,158,31,202,1 

6,247, 169, 241 , 141 , 162 
Ae210  DATA  31,169,31,141,16 

3,31,24, 173,4, 228 
N6  220  DATA  105,1,141,243,31 

, 173, 5, 22B, 105,0 
DI  230  DATA  141,244,31,96,17 

4, 31 , 215, 31 , 32, 108 
PB  240  DATA  68,73,210,32,178 

, 86, 73, 69,215, 33 
KB  250  DATA  95,88,82,69,198, 

33, 212, 70, 73, 78 
116  260  DATA  196,34,23,82,69, 

208,34, 93, 75, 73 
BE  270  DATA  76,204,32,76,68, 

79, 21 1 , 0, 0, 0 
KL2B0  DATA  242,31,45,36,32, 

73, 242, B, 201 , 155 
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NG  1  1  1  0 

LQ  1  120 

ED  1  130 

flK  11  40 

JC  1150 

EI  1160 

CE  1170 

Bn  1180 

HI  119  0 


, 165, 136, 133, 138, 163 

,  137 

DATA     133,137,96,166, 

242, 202, 232, 189, 128, 

S 

DATA     201,32,240,4,20 

1 , 155, 208, 24  4, 13  4,24 

2 

DATA  166,242,189,128 

, S, 201 , 32, 20B, 3, 232 

DATA     20B, 246, 134, 242 

, 201 , 155, 96, 24, 165, 2 

07 

133, 138 
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ODified  Shapes  For 


Ever  wonder  how  to  use  the  MOD 
operator  in  IBM  BASIC?  Here's  a 
short  explanation  of  MOD  operations 
that  create  some  stunning  graphics 
displays  as  well.  The  programs  run  on 
any  IBM  PC  with  color/graphics 
adapter  and  BASICA  or  PCjr  with 
Cartridge  BASIC. 


Though  you  may  never  have  seen  it 
used,  IBM  BASIC'S  MOD  operator 
is  a  powerful  tool  for  performing 
certain  arithmetic  operations.  Sim- 
ply put,  MOD  gives  the  integer 
(whole  number)  remainder  of  an 
integer  division.  For  example,  17 
MOD  3  =  2  because  17  divided  by 
3  equals  5  with  a  remainder  of  2. 
Likewise,  30  MOD  5  =  0  since  5 
divides  into  30  evenly  with  a  re- 
mainder of  zero. 

To  see  some  applications  of 
MOD  arithmetic,  type  in,  save,  and 
run  Programs  1-4  below.  Each  gen- 
erates a  different  geometric  display 
(see  photos),  using  MOD  in  various 
ways  to  simplify  the  graphics 
calculations. 

Although  some  dialects  of 
BASIC  don't  include  a  MOD  opera- 
tor, the  INT  function  can  be  used 
for  the  same  purpose.  In  Microsoft 
BASIC,  the  expression  K-INT(K/J)*J 
gives  exactly  the  same  result  as  the 
IBM  BASIC  expression  K  MOD  J.  If 
your  computer's  BASIC  doesn't 
have  MOD  but  does  have  a  line- 
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drawing  command  (the  Commo- 
dore 128  and  Atari  fall  into  this 
category),  you  may  find  it  interest- 
ing to  convert  the  programs  to  run 
on  your  machine. 

What  Does  MOD  Do? 

One  of  the  most  common  uses  of 
MOD  is  to  test  whether  a  value  is 
odd  or  even.  The  expression  X 
MOD  2  yields  a  1  if  X  is  odd,  or  0  if 
X  is  even.  Program  2  uses  MOD  for 
this  purpose  in  line  20,  branching  to 
line  40  only  when  the  variables  I 
and  J  are  both  odd  or  even. 

Another  common  use  of  MOD 
is  to  make  a  variable  equal  to  a 
repeating  sequence  of  consecutive 
integer.  Consider  these  statements: 

10  c  =  o 

20  C  =  C  MOD  3-1-1 

30  PRINT  C 

40  GOTO  20 

In  this  case  the  variable  C  cy- 
cles repeatedly  through  the  series 
1-2-3.  Prograrn  1  uses  MOD  in  this 
manner  to  select  the  right  color  for 
each  side  of  the  rotating  triangles. 

MOD  is  also  useful  when  ar- 
rays must  be  treated  as  circular 
rather  than  linear.  For  example,  say 
you  have  a  numeric  array  X  com- 
posed of  three  array  elements,  and 
that  elements  X(l),  X(2),  and  X(3) 
contain  the  X  coordinates  for  the 
vertices  (comers)  of  a  triangle.  In 
this  case,  if  X(m)  is  the  X  coordinate 
for  the  beginning  of  a  side,  then  the 
expression  X(m  MOD  3  +  1)  gives 


the  X  coordinate  for  the  end  of  that 
side.  This  sort  of  expression  ap- 
pears in  Programs  1,  2,  and  3, 
which  compute  the  variable  NJ 
with  MOD.  The  result  becomes  an 
index  into  the  arrays  containing  the 
vertex  coordinates  whenever  the 
program  needs  to  know  the  values 
for  the  end  of  a  side. 

How  The  Programs  Work 

After  running  the  example  pro- 
grams, you  may  want  to  know  how 
to  produce  similar  displays  of  your 
own.  The  following  explanation  ap- 
plies to  Programs  1,  2,  and  3,  which 
have  been  made  as  similar  as  possi- 
ble for  comparison  purposes. 

The  variable  SU  selects  the 
spot  on  the  side  of  a  figure  where 
the  figure's  corner  will  land  after  it 
is  rotated  and  redrawn.  If  you're 
not  sure  what  the  last  sentence 
means,  try  changing  SU  to  a  slight- 
ly different  value  and  rerunning  the 
program:  You'll  see  exactly  what  it 
does.  The  variables  I  and  ]  repre- 
sent the  row  and  column  of  the 
figure.  The  arrays  X  and  Y  contain 
the  relative  vertex  coordinates  for 
the  current  rotation.  The  arrays  XD 
and  YD  contain  relative  vertex  co- 
ordinates for  the  next  rotation.  N  is 
the  current  rotation,  M  is  the  cur- 
rent side  of  a  polygon,  and  NJ  per- 
forms the  function  described  above. 

Here  is  a  line-by-line  descrip- 
tion of  the  various  sections  in  each 
program: 
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Lines  10-50        Loop  through  J  columns 
and  I  rows.  Skip  over 
some  combinations  of  I 
and  J  (Programs  1  and  3). 
Change  values  in  the  Y 
array  to  plot  some  poly- 
gons upside-down  (Pro- 
grams 1  and  2). 

Line  60  Loop  through  N  rotations. 

Compute  the  absolute  co- 
ordinates of  the  first 
vertex. 

Line  70  Loop  through  M  sides. 

Compute  the  absolute  co- 
ordinates for  the  next 
vertex. 

Line  80  Plot  the  side.  Make  the 

absolute  coordinates  of 
the  beginning  of  the  next 
side  equal  to  the  absolute 
end  coordinates  of  the 
side  just  plotted. 

Line  90  Compute  the  relative  co- 

ordinates of  the  vertex 
that  fall  on  this  side  in  the 
next  rotation. 

Line  lOO  Move  the  values  from  the 

array  of  relative  coordi- 
nates for  the  next  rotation 
into  the  array  of  relative 
coordinates  for  the  current 
rotation. 

Program  4  works  somewhat 
differently  from  the  other  three 
programs.  After  saving  and  running 
this  program,  remove  the  statement 
C  =  l  from  line  50  and  run  it  again. 
This  time  the  colors  take  on  a  spiral 
pattern.  Can  you  explain  why? 
(Hint:  Ten  areas  are  painted  with 
three  colors  each  time  through  the 
FOR  A  =  10  TO  360  loop,  and  10 
MOD  3  =  1.) 


"MODified  Shapes  For  IBM"  shows  how 
to  easily  generate  complex  graphics  dis- 
plays like  Ihis. 


For  instnjctions  on  entering  these  listings, 
please  refer  to  "COMPUTErs  Guide  to  Typing 
In  Programs"  in  this  issue  of  COr/PUTEL 


Program  1 


UK  10  SU=.  1:RU=1-SU:KEY  DFFiSCRE 

EN  liCQLOR  0, 1:II=1:C=1 
FQ  20  FOR  J=0  TO  3:  I  I  =  -I  I :  JJ=1  :F 


OR  1=0  TO  6iJJ"-JJ=IF  KJ 

OR  I>6-J  THEN  110 
EB  30  IF  J<Z  OR  I>2  THEN  C=C  MOD 

3+1 
FP  40  IF  J»3  THEN  C=C  MOD  3+1 
SI  50  X(1)=0:XCZ)=39:X(3)=7B:Y(1 

)=0!Yf3)=0:IF  II-JJ  THEN  Y 

(2) =48  ELSE  Y(2>=-48 
ED  60  FOR  N=l  TO  11 :  Xl=3+X  (3) +1* 

39: Y1=175-YC3) -J«4B+II*JJt 

24 
R  70  FOR  M=l  TO  3: X2=3+X (M) +I«3 

9!Y2=175-Y(M)-J«4a+II»JJt2 

4:C-=C  MOD  3+1 
FD  80  LINE(X1,Y1}-(X2,Y2),C:X1=X 

2:Y1=Y2:NJ=M  MOD  3+1 
ft:  90  XD(M)=RU»X(M)+SU*X<NJ):YD( 

M)-RU«Y(M)+SU«Y(NJ) iNEXT  M 
CB  100  FDR  P=l  TO  3:X(P>=XD(P):Y 

(P)=YD(P);NEXT  P,N 
CF  110  NEXT  I,  J 

PP  120  IF  INKEY»=""  THEN  120  ELS 
E  CLS: SCREEN  0: WIDTH  B0:K 
EY  ON: END 


The  MOD  operator  simplifies  the  calcu- 
lations needed  to  produce  this  display. 


Program  2 

L6   10    SU=.12:RU-1-SU:«EY   OFF:CLS 

: SCREEN  1: COLOR  0, 1 
III  20  FOR  1=0  TO  3:  FDR  J=0  TO  3: 

IF  I  MOD  2= J  MOD  2  THEN  40 
BE  30  Y(l)=49:  Y(2)=0:  Y(3>=0:  Y(4) 

'49SB0T0  50 
IE  40  Y(1)=0:Y(2)=49:  Y<3)=49:Y(4 

)=0 
HH  50  X{1)=20:X(2)=20:X  (31=89:  X( 

4)  =89 
FD  60  FDR  N=0  TO  18:  X1=X  <4) +It69 

:Y1=Y(4)+J«49 
PL  70  FOR  M=l  TO  4s  X2=X  CM) +1 169: 

Y2=Y(M)+Jt49 
BK  80  LINE(X1,Y1)-(X2,Y2),M  MOD 

2+l:Xl-X2sYl=Y2:NJ=M  MOD  4 

+  1 
FK  90  XD(M)=RU»X{M>+SU«X(NJ) :YD( 

M)-RU«Y(M)+SU*Y(NJ)sNEXT  M 
EO  100  FOR  P=l  TD  4!X(P)=XD(P):Y 

(P)"YD(P) sNEXT  P,N, J,I 
EP  110  IF  INKEY*=""  THEN  110  ELS 
E  CLS: SCREEN  0: WIDTH  60: E 
ND 


Program  3 


PN  10  SU=.2:RU=1-SU:KEY  OFF:CLB: 

SCREEN  1: COLOR  0, 1 
HF  20  FOR  J=0  TO  2:  FOR  1  =  0  TO  2: 

IF  J=0  AND  lOl  THEN  110 
BL  30  IF  1  =  1  THEN  E=31  ELSE  E=0 


This  screen  is  produced  with  only  a 
dozen  program  lines. 


0(140    X(1)=0:X(2)=255X(3)=75:X(4 

)"100:X<5}=75:Xt6)=25 
KB   S0    Ya)=31:Y(Z)=0:Y(3)=0!Y(4) 

-31:Y(5)»62sY(6)=62 
CB  60   FOR   N=0   TO    20:  Xl=35+X  (6) +1 

«75: Y1-223-Y (6) -J«62-E 
flC   70    FOR   M-1    TO    6:X2=35+X<M)+I» 

75; Y2-223-Y (Ml -J«62-E 
J6   B0   LINE(X1,Y1)-{X2,Y2!  ,M    MOD 

3+l!Xl-=X2:Yl=Y2!NJ-M   MOD    6 

+  1 
FK  90    XD(ri)=RU»X(M)+SU»X(NJ):YD( 

M)-RU«YtM)+SU«Y(NJ):NEXT   M 
NB   100   FOR    P=l    TO    6sX(P)=XD(P)!Y 

(P)=YD(P):NEXT   P,N 
Cf   110   NEXT    I,  J 

PP  120  IF  INKEY»=""  THEN  120  ELS 
E  CLS: SCREEN  0:WIDTH  B0:K 
EY    ON: END 


A  multicolored  screen  display  with  help 
from  MOD. 


Program  4 


BK    10 


Dl  20 
NG   30 

on  40 
01   50 

FD   60 


PJ   70 
BI   80 


U   90 


KEY  OFF: CLS: SCREEN  1; COLOR 
0,0: FOR  K=0  TO  9: READ  F(K 
1  !  NEXT 

FOR  A=10  TD  360  STEP  10 
X=l 60+4a*CDS (At . 017453) : Y= 
100+40*SIN(A«. 017453) 
CIRCLE(X,Y),60:NEXT 
FOR  ft=10  TD  360  STEP  10: C= 
Is  FOR  K=0  TO  9:C=C  MOD  3+1 
X=160+l . 2»F (K) »COS ( At .0174 
53):Y=100+F(K)«SIN(At.0174 
S3) 

PflINT(X,  Y)  ,C,3:NEXT  K,A 
IF  INKEYS=""  THEN  80  ELSE 
CLS: SCREEN  0: WIDTH  80: KEY 
ON: END 

DATA  26,34,41,51,61,68,78, 
84,87,89 


@ 


May  1 986     COMPUTEI      87 


Custom  Characters 
For  Atari  SpeedScript 


Charles  Brannon,  Program  Editor 


Atari  SpeedScript's  large-sized  char- 
acter set  with  true  descenders  is  de- 
signed for  maximum  readability.  Since 
it  is  built  into  SpeedScript,  though, 
it's  difficult  to  change.  Now,  with  the 
accompanying  program,  you  can  add 
your  own  custom  font  to  Speed- 
Script — even  special  characters  for 
foreign  latiguages.  To  help  you  design 
your  own  sets,  last  month  we  pub- 
lished "Atari  FontMaker,"  a  versatile 
character  editor  written  completely  in 
machine  language.  This  month's  pro- 
gram automatically  creates  a  new 
copy  0/ SpeedScript  with  your  custom 
set  installed.  It  works  on  any  Atari 
400/800,  XL,  or  XE  computer  with  at 
least  24K  RAM  and  a  disk  drive. 


When  you're  writing,  you  probably 
don't  think  about  the  technical  mir- 
acles that  make  word  processing 
possible.  The  characters  on  the 
screen  seem  as  fixed  as  those  on 
paper,  but  they're  actually  dis- 
played from  a  section  of  memory.  If 
you  can  change  this  memory,  you 
can  change  the  shape,  form,  and 
order  of  the  characters. 

Normally,  the  Atari's  character 
set  is  permanently  and  unalterably 
stored  in  Read  Only  Memory 
(ROM),  But  you  can  tell  the  video 
chip  to  look  elsewhere  for  the  char- 
acter patterns,  so  it's  possible  to 
substitute  your  own  set.  Atari 
SpeedScript  uses  just  such  a  tech- 
nique, coupled  with  a  special  Atari 
character  mode,  to  display  large, 
well-formed  characters. 


One  way  to  design  your  own 
characters  is  to  sketch  them  on  grid 
paper,  convert  the  resulting  binary 
patterns  into  numbers,  and  then 
substitute  these  numbers  in  the  sec- 
tion oi  SpeedScript  that  modifies  the 
character  set. 

Fortunately,  there's  an  easier 
way.  You  can  use  a  character  set 
editor  {or  font  editor)  to  "draw"  the 
desired  characters  with  a  joystick. 
The  font  editor  converts  the  pat- 
terns into  numbers  for  you  and 
saves  the  new  set  on  disk  for  later 
use.  There  are  many  font  editors 
available  for  the  Atari,  but  relative- 
ly few  of  them  let  you  design  char- 
acters for  the  unusual  ANTIC  3 
mode  that  SpeedScript  uses.  This 
mode  displays  a  taller  character 
grid  so  you  can  design  characters 
with  true  descenders  (the  protruding 
tails  on  letters  such  as  j  and  y). 

Last  month's  COMPUTE!  intro- 
duced "Atari  FontMaker,"  a  full- 
featured  font  editor  written 
completely  in  machine  language. 
FontMaker  lets  you  design  custom 
fonts  for  all  Atari  character  modes, 
including  ANTIC  mode  3.  The 
FontMaker  article  included  some 
instructions  for  creating  SpeedScript 
ANTIC  3  characters,  and  also  some 
tips  for  designing  more  readable 
characters.  After  designing  a  new 
character  set  with  FontMaker,  you 
can  use  Program  1,  "SpeedScript 
Characterizer,"  to  automatically 
create  a  new  copy  of  SpeedScript 
with  your  custom  font.  The  custom 
characters  appear  each  time  you 
load  the  modified  copy  of  Speed- 
Script. 


Making  A 
SpeedScript  Font 

If  you  want  to  convert  a  normal 
character  set  for  use  with  Speed- 
Script  (perhaps  one  that  you've  de- 
signed with  another  font  editor), 
start  by  loading  the  set  into  Font- 
Maker.  Press  G  to  switch  to  the 
ANTIC  3  mode.  (The  G  command 
cycles  through  the  graphics  modes, 
and  the  first  mode  after  the  default 
GRAPHICS  0  mode  is  ANTIC  3.) 
You'll  recognize  this  mode  because 
the  normal  characters  appear  split, 
with  their  lower  portions  shifted  to 
the  top  of  the  character  grid. 

Use  FontMaker's  roll  up  com- 
mand (CTRL-cursor  up)  to  move 
each  character  up  by  one  line.  Roll 
up  automatically  wraps  the  lower- 
case descenders.  If  you  want  to 
make  two-line  descenders  such  as 
those  found  in  the  SpeedScript  font, 
roll  the  lowercase  letters  up  by  two 
notches,  erasing  the  last  line  of  any 
characters  that  intrude  into  the  de- 
scender zone,  such  as  the  lowercase 
h.  Then  shift  up  (SHIFT-cursor  up) 
all  the  uppercase  characters  by  two 
lines,  and  add  an  extra  line  of  defi- 
nition to  each  character  so  they 
have  the  same  baseline  as  the  low- 
ercase characters.  As  you  work,  re- 
fer to  the  "quick  brown  fox" 
sentence  displayed  by  FontMaker 
to  see  how  your  characters  match 
up.  When  you're  done,  save  your 
new  font  on  disk  with  the  S  (Save) 
command. 

One  additional  preparatory 
step  is  required  if  your  copy  of 
SpeedScript  came  from  the  May  1985 
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COMPUTE!  DISK.  A  version  of  Speed- 
Script  typed  in  and  saved  vi'ith  MLX 
(or  from  the  companion  disk  for  the 
book  SpeedScript:  The  Word  Processor 
for  Atari  Computers)  appears  on  disk 
as  one  continuous  block  and  re- 
quires no  special  preparation.  The 
COMPUTE!  DISK  version  is  stored  in 
an  alternative  format — as  a  collec- 
tion of  linked  segments.  (For  a  dis- 
cussion of  the  differences  between 
these  formats,  see  Bill  Wilkinson's 
"Insight:  Atari"  column  in  the  April 
1986  issue.)  This  causes  a  problem 
because  Program  1  expects  to  load 
SpeedScript  as  a  conhnuous  file. 

The  solution  is  to  use  Program 
2,  a  corrected  version  of  the  file 
unification  program  from  the  April 
"Insight"  column,  to  convert  the 
linked  segment  file  into  a  continu- 
ous block  file.  If  you're  unsure 
about  the  origin  of  your  copy  of 
SpeedScript,  it  won't  hurt  to  process 
it  with  the  file  unifier  program  any- 
way. If  the  file  was  already  a  con- 
tinuous block,  Program  2  just 
produces  a  duplicate  copy.  (One 
way  to  tell  the  difference:  In  DOS 
2.0  format  the  desired  continuous 
block  version  of  SpeedScript  is  67 
blocks  long,  while  the  linked  seg- 
ment version  requiring  conversion 
is  66  blocks  long.) 

Now  you're  ready  to  merge 
your  redefined  character  set  with 
SpeedScript.  Type  in  and  save  the 
SpeedScript  Characterizer  (Program 
1)  below.  After  you  run  it,  insert  the 
disk  containing  your  copy  of  Speed- 
Script  (the  unified  copy  produced 
by  Program  2  if  you  have  the  COM- 
PUTE! DISK  version)  and  type  in  the 
filename  you  use  for  SpeedScript 
(AUTORUN.SYS,  for  example). 
Characterizer  loads  SpeedScript  into 
a  memory  buffer. 

Next,  insert  the  disk  containing 
your  character  set  and  enter  its  file- 
name. After  this  character  set  is 
loaded,  insert  the  disk  that  will 
store  the  new  copy  of  SpeedScript. 
Type  in  the  filename  you'd  like  to 
call  it.  (For  safety's  sake,  be  very 
careful  not  to  replace  your  existing 
copy  of  SpeedScript.  If  you  have  to 
name  SpeedScript  as  AUTORUN. 
SYS  to  run  it  with  Atari  DOS  2.0  or 
2.5,  use  another  disk  or  rename  the 
original  copy  of  SpeedScript  some- 
thing else  before  you  try  to  use 
Program  1.) 

Finally,  boot  up  the  new  Speed- 


Script  and  behold  your  custom 
character  set.  Try  typing  all  the 
characters  to  make  sure  they  are 
well-formed.  If  you  made  a  mis- 
take, you  can  always  edit  the  char- 
acter set  and  reinstall  it. 

Keep  in  mind  that  SpeedScript 
uses  the  heart  character  to  pad  out 
the  end  of  each  line  with  spaces.  If 
you  don't  want  to  see  a  screenful  of 
hearts,  make  sure  you've  blanked 
out  the  heart  character  in  your  set. 
Also,  SpeedScript  normally  uses  the 
left  arrow  (cursor-left)  for  the  return 
mark  at  the  end  of  each  paragraph, 
so  you  may  want  to  change  this  to 
some  personalized  symbol.  If  you 
don't  want  to  see  return  marks, 
blank  out  this  character,  or  perhaps 
change  it  to  a  single  tiny  dot  so  you 
can  easily  delete  what  would  other- 
wise be  an  invisible  character. 

Program  1 :  SpeedScript 
Characterizer 

For  instructions  on  entering  this  l[st[ng,  please 
refer  to  "COMPUTEI's  Guide  to  Typing  In 
Programs"  in  this  issue  of  Computei. 

Jt  10  OPEN  #3,4,0,  "K:  ■' 

1.515  DIM  CID4  (7)  :  CID«="hhh* 
Ly":CID«(4,4)=CHR*(170 
! : CIO* (7) =CHR* (22B) 

flL  100  DIM  SF» < 14)  , T»  (40)  ,  SS 
t ( 10000) , C5$ (14) 

CJ110  GRAPHICS  17:P0KE  82,0 
iSETCOLOR  4,0,10:SETC 
OLOR  2, 0, 2: SETCDLDR  0 
, 3, 4: SETCOLDR  1,5,14 

Lj  120  ?  #6; '•aass-BEiijjiaEHs; 

11(130    POKE    87,0:?     "tMISISl^Si 

IC3  aera^Jt^' 


AM  140 
FB  150 

CP  160 

£11  170 

OE  180 
IC  190 

LC  200 

KC  210 
EP  220 

CE  230 
DH  240 


[OIEEaMl" 
INPUT  SF 
HEN  RUN 
IF  LEfvKS 
SF» (2, 2 
3,3)=": " 
Tt-SF»: S 
)  =T« 

TRAP  180 
SF«: TRAP 
90 

?  "error 
en":?  SF 
BHaX"  :  GE 
LET  READ 
ADR (SS*> 
BOSUB  97 
) =CHR« (0 
?  CHR»{1 
IBIBEj"  :  ? 

aai" 

INPUT  CS 
HEN  200 

IF  LEN(C 
CS» (2, 2 
3,3)=":" 
T«=CS*: C 
)  =T$ 

TRAP  250 
CS$! TRAP 
£>0 


S: IF  SF*=""  T 

Ft) >2     THEN  IF 
) =" : "  OR  SF* ( 

THEN  170 
Ft="D: ":SF» (3 

OPEN  #2,4,0, 
40000:GDTD  1 

try i  ng  to  op 
»:?  "PRESS  ET^ 
T  #3,A:RUN 
=  1  : X  =  32: SADR  = 

«ftXLEN=9999: 
0: SS* (TRUELEN 
) : CLOSE  #2 

*: IF  CS»=" "  T 

S$) >2  THEN  IF 

) =" : "  OR  CS* ( 

THEN  240 
S*="D: " :CS* (3 

DPEN  #2,4,0, 
40000:SOTO  2 


MP  250  ?  CHR*  (  125)  ;  "error  tr 

ying  to  open":?  CS*:? 

"PRESS  r:Tatjr.':r"  :  GET  # 

3,A:CL0SE  i2:G0T0  200 

PF  260  LET  READ=1  :  X-32S  MAXLE 
N=1024:SADR=ADR(SS*)+ 
262:GDSUB  970:CLDSE  « 
2 

PN  270  ?  CHR*  (  125)  ; 

JO  280  ?  "a 

"axm 


Lfl  290 
F5  300 

cn  310 
D6  320 
EF  330 

flL  335 

FP  3  40 

GP  330 
IK  899 
BB  970 


>-TU^:>ti.-TH:«<Jl.    " 

INPUT  SFt:IF  SF*=""  T 
HEN  200 

IF  LEN(SF»)>2  THEN  IF 
SF»  (2,2)-":"  OR  SF« ( 


3,3)=" 


THEN  320 


T»=SF*:SF*="D: ":BF*(3 

)=T« 

TRAP  335:DPEN  #2,8,0, 

SF*:TRAP  40000 

LET  READ=0: X=32: MAXLE 

N=LEN (SS*) : SADR=ADR (S 

S»):QOSUB  970:eOTO  34 

0 

IF    PEEK(195)<>1     THEN 

?  CHR*<i25) ;  "sTncnKai; 

kAiMm^iSS"  i  CLOSE     «2:QD 
TD     280 

POKE  82, 2:eRAPHICS  0: 
?  "Good  luck;" 

END 

GOTO     899 

EPTT 

REM    File#2,*20 
ICCaM=834: ICBADR=B36: 
ICBLEN=e40: ICSTAT=83S 
(111000     H=INT  (SADR/256)  :  L  =  SA 

DR-H»256: POKE     ICBADR 

+X,L:PDKE  ICBADR+X+1 

,H 
FC  1010  H=irMT  (MAXLEN/25i.)  :  L" 

MAXLEN-H*254j:  PGKE  IC 

BLEN+X,L: POKE  ICBLEN 

+  X+  1  , H 
MD  1020  POKE  ICCDM+X,  1  1-4»RE 

AD: A=USR (ADR (CIO*) , X 

) 

TRUELEN=PEEK ( ICBLEN+ 

X) +2 56* PEEK ( ICBLEN+X 

+  1  )  +1 

POKE  195, PEEK ( ICSTAT 

) : RETURN 


flB  980 
Ef  990 


BK  1025 


BE  1030 


Program  2:  File  Unifier 

Program  by  Bill  Wilkinson 
For  instructions  on  entering  this  listing,  please 
refer  to  "COMPUTEI's  Guide  to  Typing  In 
Programs"  In  this  issue  of  coMPUTEf. 


EE  1000 

DF  1010 
AH  1020 
if  1030 

FJ  1040 
M9  1050 


EA  1060 


£E  J  070 


F6  10S0 
AA  10  90 


RE 
NI 
BU 
DI 
DI 
EN 
FI 
PR 
le 

g" 

PR 
a 
h" 
PR 
e 

od 
PR 
PR 

•7 


n     *«  BINARY  FILE  U 
FIER  *« 

FSIZE=FRE (0) -300 
M  BUF*<BUFSIZE) 
M  FILEOLD* (40) , FIL 
EW* (40) 
LL  =  0 

INT  "I  need  two  fi 
names:  An  existin 

INT  "   object  file 
nd  a  new  file  whic 

INT  "   will  get  th 

'unified'  object  c 

e  .  " 

INT 

INT  "Existing  file 
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CL  1  100 
HI  1110 

DI  1120 

FB  li30 
KP  1140 

PD  1  150 

PF  1  160 

KS  1170 
6L  1180 
Bl  1  1<70 

III  1200 

BC  1 20S 

«E  1210 
01  1220 

ti  1230 

HF  1240 

BE  12S0 

DI  12SS 

ID  1260 

BP  1270 

HC  12B0 

HI  1290 
JL  1300 

pr  1 3  1  0 
BL  1320 
JE  1330 

PD  1340 
(B  1350 


DG  1360 

ID  1370 

HS  138  0 

JH  1390 

Dl  1400 

ni  1410 

BA  1420 

HF  1430 

BF  1435 

LK  1440 

OJ  1450 

Lr  1460 

At  1470 
KN  14B0 
Lfl  1485 

U  1490 

NL  1500 


]D  1510 
Jfl  1515 
CN  1520 

a  1530 


INPUT  #16,FILE0LD« 
PRINT  "t5  SPACeS>NBW 

■file?  "; 
INPUT  #16,FILENEW» 
OPEN  #1 , 4, 0, FILEOLDS 
SET  #1,HDR1:GET  »♦  1  ,  H 
DR2 

IF  HDR1=2S5  AND  HDR2 
=255  THEN  1180 
PRINT  :PRINT  "Existi 
ng  file:  invalid  for 
mat  " 
END 

OPEN  #2, 8, 0, FILENEW* 
PUT  »2,HDR1:PUT  #2,H 
DR2 

GET  «1,SEBL0M:0ET  ttl 
.SEQHIQH 
REM  tt  Process  •  dbm 

ori  gin 
BUFPTR-0 

BUF*=CHR» (05 !BUF«(BU 
FSIZE) =CHR» (0) 
BUF* (2)=BUF»! REM  zap 

buffer 
PUT  »2,SEBL0W:PUT  #2 
,SEBHIQH 

SEQSTART=SE6L0W+256« 
SE6HIGH 

REM  tt  Process  a  seg 
men  t 

GET  ttl,ENDLaW:6ET  HI 
,ENDHIOH 

SEQEND=ENDL0W+256*EN 
DHISH 

SE6LEN=SEQEND-SEHSTfl 
RT+1 

FOR  PTR"1  TO  SEBLEN 
GET  #1 ,BYTE:BUF*<BUF 
PTR+PTR) =CHR» (BYTE) 
NEXT  PTR 
TRftP  1490 

BET  »1,SEQL0W:QET  #1 
, SEBHI3H 
TRAP  40000 

IF  SEaL0W=255  AND  SE 
BHIGH=255  THEN  BET  # 
1,SEBL0W:BET  #1,SE6H 
I3H 

SEGSTART-SEBLOW+256* 
SEGHIGH 

GAP=SEGSTART-SEBEND- 
1 
IF  GAP>FILL  OR  6AP<0 

THEN  1420 
BUFPTR=BUFPTR+SEGLEN 
+  BAP 

IF  BUFPTR+256>BUFSIZ 
E  THEN  1420 
GOTO  1260 
GOSUB  1440 
eOTD  1210 

REM  «*  Dump  buffer 
PUT  #2,ENDL0W: PUT  #2 
, ENDHIGH 

FOR  PTR=1  TO  LEN(BUF 
«) 

PUT  #2,A5CiBUFStPTR) 
) 

NEXT  PTR 
RETURN 

REM  t*  Error  encQunt 
ered 

IF  PEEK< 195) =136  THE 
N  1520 

PRINT  "Unexpected  er 
ror,  number  ";PEEK(1 
95) 
END 

REM  «»  End  of  file 
GOSUB  1440:REM  Mrite 

out  buffer 
END  @ 
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Terry  Roper 


Now  you  can  throw  away  your  list  of 
start-up  SYS  addresses  for  different 
machine  language  programs.  Using  a 
unique  loading  method,  this  clever 
utility  lets  you  transform  a  BASIC  or 
machine  language  program  into  an 
autobooting  program  that  runs  as 
soon  as  it  loads — no  matter  where  it 
normally  loads  into  memory.  In  addi- 
tion, the  autobooting  program  can 
survive  many  system  crashes  that 
would  destroy  a  conventionally  loaded 
program.  A  disk  drive  is  required. 


"64  Autobooter"  can  add  autoboot- 
ing— the  ability  to  run  automatical- 
ly after  loading — to  many  different 
BASIC  and  machine  language  pro- 
grams. While  you  may  be  familiar 
with  other  autoboot  utilities,  the 
most  common  techniques  have  sig- 
nificant drawbacks:  Either  they  re- 
quire a  separate  boot  file  to  load 
and  run  the  main  program,  or  they 
increase  the  size  of  your  program 
significantly.  But  Autobooter  pro- 
grams don't  suffer  from  either 
problem.  The  autobooting  file  is  all 
in  one  piece  and  is  only  257  bytes 
longer  than  the  original  program. 
Even  better,  Autobooter  programs 
can  survive  unscathed  in  situations 
that  would  erase  or  scramble  pro- 
grams loaded  the  normal  way. 

Creating  Autoboot  Files 

Type  in  64  Autobooter  and  save  a 
copy  before  you  run  it.  Using  the 
program  is  just  a  matter  of  respond- 
ing to  a  few  prompts.  First,  you  type 
a  filename  for  the  program  you 
wish  to  convert.  This  file  may  be 
any  program  file  on  disk,  but  it  may 
not  exceed  7,935  bytes  in  length 
(more  on  this  later).  As  a  rough 
guide,  7,935  bytes  take  up  about  31 
blocks  on  the  disk  directory. 

After  you  supply  the  filename, 
the  disk  drive  makes  two  passes 
through  the  program  file.  The  first 
pass  counts  every  byte  of  the  file  to 
make  sure  that  it's  within  the  7,935- 


byte  limit  and  calculates  the  load 
address  for  the  new  Autobooter 
version.  The  second  pass  stores  the 
file  in  memory.  When  the  drive 
stops,  you  are  asked  whether  the 
program  is  BASIC  or  machine  lan- 
guage (ML).  If  the  program  is  all 
BASIC  (or  it  begins  with  a  BASIC 
line  like  SYS  2061),  type  B  to  choose 
BASIC.  If  it  is  an  ML  program  that 
loads  at  some  address  other  than  the 
start  of  BASIC,  enter  the  normal 
SYS  address  when  prompted. 

Finally,  you'll  be  prompted  to 
enter  a  filename  for  the  new  auto- 
booting file.  At  this  point,  the  pro- 
gram writes  the  autobooting  file 
back  to  disk,  using  the  last  filename 
you  specified.  The  new  file  consists 
of  a  copy  of  the  original  file  plus 
257  bytes  (about  one  disk  block)  of 
machine  language.  This  one-block 
addition  is  the  only  penalty  you  pay 
for  the  convenience  of  using  Auto- 
booter files. 

When  this  process  is  complete, 
the  new  file  is  ready  to  use.  An 
autobooting  file  is  a  self-sufficient, 
autobooting  version  of  the  original, 
but  with  some  unusual  differences. 
The  most  unusual  fact  is  that  all 
Autobooter  files  share  exactly  the 
same  ending  address,  even  though 
nearly  all  of  them  have  different 
load  addresses.  And  loading  ML 
files  with  the  Autobooter  method 
does  not  disturb  the  computer's 
start-of-variables  pointer  at  loca- 
tions 45-46  ($2D-2E).  So  you  can 
load  an  ML  program  with  the  assur- 
ance that  any  BASIC  program  pre- 
viously in  memory  will  still  run  and 
save  correctly. 

An  impressive 
Demonstration 

Here's  a  short  demonstration  that 
shows  how  useful  64  Autobooter 
can  be.  Choose  a  BASIC  program 
that  you  would  like  to  convert  to 
Autobooter  form.  It  can  be  any  pro- 
gram, as  long  as  the  original  file 
contains  fewer  than   7,935  bytes. 
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Follow  the  procedure  for  convert- 
ing the  program  to  Autobooter  for- 
mat, then  perform  these  steps: 

1.  Type  NEW. 

2.  Type  LOAD  "FILENAME",8,1 
(replace  FILENAME  with  the  file- 
name of  your  autobooting  file).  The 
program  should  load  and  run  auto- 
matically; if  it  doesn't,  reload  64 
Autobooter  and  check  for  typing 
errors. 

3.  When  you're  satisfied  that  your 
program  is  running  as  usual,  stop 
the  program  by  pressing  RUN/ 
STOP  (or  RUN/STOP-RESTORE 
if  necessary). 

4.  Now  it's  time  to  get  tough.  Type 
NEW,  then  LIST  to  confirm  that  the 
program  is  gone.  Type  POKE  1,0 
and  press  RETURN.  The  program 
should  be  running  once  again,  even 
though  that  POKE  is  one  that  nor- 
mally locks  up  the  computer. 

5.  Press  RUN/STOP  to  stop  the 
program,  then  load  any  other 
BASIC  program  into  memory.  This 
ensures  that  the  first  program  is 
completely  overwritten  by  new  data. 

6.  Type  POKE  1,0  and  press  RE- 
TURN. Immediately,  the  autoboot- 
ed  program  reappears  in  memory 
and  begins  to  run.  You  should  be 
able  to  VERIFY  at  this  point  with 
normal  results. 

What's  going  on  here?  For  one 
thing,  you've  seen  how  durable 
these  files  can  be.  Even  after  you 
destroy  the  program  in  its  normal 
location,  you  can  resurrect  it  in- 
stantly with  POKE  1,0.  Another  ad- 
vantage is  that  you  no  longer  need 
to  memorize  different  SYS  address- 
es for  every  machine  language  pro- 
gram. Regardless  of  where  an 
Autobooter  program  normally 
loads,  whether  it's  BASIC  or  ML, 
you  can  restart  it  with  POKE  1,0. 

It's  not  hard  to  see  how  this 
would  come  in  handy.  For  instance, 
suppose  you're  using  a  BASIC  pro- 
gram. Suddenly,  the  need  arises  to 
run  a  program  that  occupies  the 
same  memory  area.  If  the  original 
program  is  in  Autobooter  format, 
this  presents  no  problem  at  all. 
Load  the  second  program  and  run  it 
as  usual.  When  you're  finished, 
type  POKE  1,0  to  restore  the  auto- 
booted  program, 

A  second  advantage  has  to  do 
with  loading  ML  files.  Under  ordi- 


nary circumstances,  loading  an  ML 

program  into  high  memory  after 
loading  a  BASIC  program  can  cause 
an  OUT  OF  MEMORY  error  when 
you  try  to  run  the  BASIC  program. 
If  the  ML  program  is  an  Autobooter 
file,  you'll  avoid  this  error. 

Wraparound  Addressing 

By  now  you  might  be  wondering 
how  these  unusual  features  are  pos- 
sible. We  mentioned  earlier  that 
Autobooter  files  may  not  exceed 
7,935  bytes  in  length.  This  is  neces- 
sary for  two  reasons.  The  257-byte 
ML  program  attached  to  your  origi- 
nal file  must  always  load  into  mem- 
ory beginning  at  location  $FFOO 
(65280).  The  rest  of  your  original 
file  comes  into  memory  directly  be- 
low the  ML  code  in  the  area  from 
$EOOO-$FEFF  (57344-65279).  As 
you  may  know,  loading  a  program 
into  this  zone  causes  it  to  be  stored 
in  the  RAM  underlying  the  Kernal 
ROM  chip. 

Why  is  it  so  crucial  to  load  the 
last  257  bytes  at  $FFOO?  If  you're 
paying  close  attention,  you  may 
have  noticed  that  257  plus  $FFO0 
equals  more  than  65535,  the  high- 
est address  that  the  64's  micro- 
processor can  refer  to.  After  you 
load  the  byte  that  goes  into  location 
$FFFF,  there  are  still  two  bytes  to 
load.  Since  it's  impossible  to  use  a 
higher  address,  the  computer  wraps 
around  to  the  bottom  of  its  address- 
ing range  and  loads  the  last  two 
bytes  into  addresses  $00  and  $01. 

Loading  a  file  in  this  wrap- 
around fashion  has  two  important 
consequences.  It  allows  you  to 
change  the  contents  of  the  64's  on- 
chip  I/O  port  (location  1)  as  well  as 
the  vector  to  its  main  IRQ  handler 
($FFFE-$FFFF).  Let's  look  at  loca- 
tion 1  first.  The  chief  function  of 
location  1  is  to  control  whether  the 
64  "sees"  ROM  and  I/O  chips  or 
the  underlying  RAM  at  memory  lo- 
cations above  $A000  (40960).  Un- 
der normal  circumstances,  the 
computer  sees  BASIC  ROM  at  loca- 
tions $A0O0-BFFF,  I/O  chips  at  lo- 
cations $DOOO-DFFF,  and  the 
Kemal  ROM  at  locations  $E000- 
FFFF.  When  you  load  an  Autobooter 
file  into  memory,  it  loads  the  value 
$35  into  location  1,  switching  out 
the  ROM  in  locations  $E0O0-$FFFF 
and  exposing  the  underlying  RAM. 

Once  the  ROM  is  switched  out. 


the  microprocessor  can  see  the  rest 

of  the  Autobooter  file  that  was  just 
loaded.  Among  other  things,  this 
file  loaded  new  information  into 
locations  $FFFE-$FFFF.  This  pair  of 
locations  contains  a  vector,  or  two- 
byte  address,  which  points  to  the 
64's  main  IRQ/BRK  handler  rou- 
tine in  ROM.  Sixty  times  every  sec- 
ond, and  whenever  the  computer 
encounters  a  BRK  instruction,  the 
computer  jumps  to  the  address 
pointed  to  by  this  vector.  Auto- 
booter files  replace  the  normal  vec- 
tor with  a  new  one  that  points  to 
the  new  ML  that  we  just  loaded  into 
underlying  RAM. 

The  rest  of  the  ML  program 
moves  the  autobooted  program  to 
its  normal  load  address,  switches 
ROM  back  in  (by  putting  a  value  of 
$37  in  location  1),  and  runs  the 
program  as  usual,  (Incidentally,  the 
Commodore  128  normally  has  a 
value  of  $77  in  location  1  while  it's 
in  64  mode.  This  has  no  effect  on 
Autobooter  files,  but  does  prevent 
certain  commercial  programs  from 
working  properly.  Pressing  CAPS 
LOCK  restores  the  normal  value  of 
$37,  which  fixes  the  problem  in  at 
least  some  of  the  cases.) 

Mysterious  VERIFY  Errors 

Although  the  computer  normally 
resets  the  computer's  start-of- 
variables  pointer  after  every  load, 
64  Autobooter  does  this  job  on  its 
own.  If  the  program  is  ML  which 
doesn't  load  at  the  start  of  BASIC, 
the  start-of- variables  pointer  is  not 
changed.  This  lets  you  load  ML 
programs  without  disturbing  any 
BASIC  program  in  memory.  If  the 
Autobooter  file  is  BASIC,  the  point- 
er is  set  to  the  end  of  the  program 
text  as  usual. 

Some  Autobooter  files  may 
give  you  mysterious  VERIFY  errors. 
Don't  panic — it's  not  uncommon 
for  ML  programs  to  alter  them- 
selves once  run.  Naturally,  a  file 
that's  been  modified  isn't  the  same 
as  the  original  file  on  disk.  If  a 
BASIC  program  was  saved  from  an 
abnormal  location  it  won't  VERIFY 
either;  this  is  due  to  the  relinking 
process  that  occurs  after  every 
BASIC  program  is  loaded.  A  good 
method  for  initial  testing  of  ML  files 
is  to  create  them  as  usual  but  enter 
42100  instead  of  the  normal  SYS 
address.  This  returns  you  to  BASIC 
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without  starting  your  program;  the 
file  should  VERIFY  correctly. 

Here's  a  subtle  bug  to  look  out 
for.  Suppose  you  have  the  follow- 
ing program: 

100  AO  -  828:  POKE  AO,  0 

This  defines  the  variable  AO, 
but  not  the  variable  AO  (with  the 
letter  O  instead  of  a  zero).  Since 
undefined  numeric  variables  al- 
ways equal  zero,  the  POKE  is  di- 
rected to  location  0,  the  data 
direction  register  for  location  $01.  If 
you  run  this  program  and  then  try 
to  start  an  autobooting  program 
with  POKE  1,0,  it  fails  because  the 
new  bit  pattern  at  location  0  pre- 
vents any  new  value  from  being 
stored  in  location  1.  Hit  RUN/ 
STOP-RESTORE  to  fix  both  loca- 
tions, then  try  again. 

As  a  matter  of  fact,  it  doesn't 
hurt  to  hit  RUN/STOP-RESTORE 
before  activating  any  autobooting 
program.  Many  ML  programs 
change  the  IRQ  vector  at  locations 
$0314-$0315.  If  you  try  to  activate 
an  Autobooter  file  under  these  con- 
ditions, the  computer  will  probably 
crash  as  soon  as  the  interrupt  is 
reenabled. 

Finally,  while  some  cartridges 
don't  interfere  with  Autobooter 
files,  others  cause  erratic  behavior. 
Cartridges  can  reconfigure  the  com- 
puter in  many  different  ways,  so 
you'll  have  to  find  out  by  trial  and 
error  whether  a  particular  Ayto- 
booter  file  works  with  a  given 
cartridge. 

64  Autobooter 

For  instructions  on  entering  ttiis  listing,  pleose 
refer  to  "COtvlPLITEi's  Guide  to  Typing  In 
Programs"  in  this  issue  of  compute!. 

BC  100  POKE  55,0! POKE  56,48  J CL 

R 
HR  110  PRINT: PRINT  "AUTO  BOOTH 

AKER"  : IFPEEK ( 24591 )=164 
THEN150 
GP  120  PRINTS  PRINT  "JUST  A  MOI4E 

NT ... " 
DE  130  FOR  J=12288  TO  12744:RE 

AD  D:S=S+D!P0KE  J,D:NEX 

T 
JE  140  IF  S051414  THEN  PRINT: 

PRINT "MISTYPED  DATA": EN 

D 
GF  150  OPEN  15,a,15:SYS  X2288 
GX  160  PRINT: PRINT "FILE  FOR  AU 

TO  BOOTMAKER"? 
SJ  170  GOSUB370 SPRINT: PRINT"ME 

ASURING  YOUR  FILE" 
AJ  180  OPEN  5,8,5,  "0: "+N5  +  ",P, 

R":GOSUB350!lF  El ? <> " 00 

"  THEN160 


CR  190  SYS  24834 iCLOSE  5!B=PEE 

K (24578) +256 *PEEK( 24579 

) : PRINT  B; "BYTES" 
AG  200  IF  B>7935  THEN  PRINT  CH 

R$(18) ;STR?(a-7935)" 

[2    SPACES] BYTE  OVERFLOW 
":GOTO160 
CR  210  PRINT: PRINT"READING  FIL 

E  INTO  MEMORY" 
PF  320  OPEN  5,8,5, "0: "+N5+",P, 

R":SYS24e34:CLOSE  5 
BK  230  FOR  J=0  TO  31:POKE24592 

+J,PEEKt24112+J) !POKE24 

624+J,PEEK{22032+J) 
HH  240  POKE  22032+J,0:NEXT 
CE  250  PRINT: PRINT "BASIC  OR  ML 

(B/M) "; :GOSUB370 
QR  260  IF  N5="B"  THEN  POKE  245 

82,l:POKE  24583, 8:G0TO3 

00 
EH  270  POKE  24587, 1:PRINT:PRIN 

T"  JUMP  TO  ADDRESS" J :G0 

SUB370 
JG  280  H%=(VAL{N?)-1)/256:L%=( 

VAL(N5)-1)-H%*2S6 
FR  290  POKE  24588, L%:POKE  2458 

9,H% 
BF  300  PRINT: PRINT "PREPARING  T 

O  WRITE  NEW  FILE" 
XK  310  PRINT "INSERT  ANOTHER  DI 

SK  IF  DESIRED" 
SA  320  PRINT: PRINT "NEW  FILENAM 

E"; :GOSUB370:PRINT#15, " 

10" 
PE  330  OPEN  5,8,5, "0! "+N$+",P, 

W"!GOSUB350:IF  E15<>"00 

"THEN300 
JF  340  SYS  24950! CLOSES :CL0SE1 

5:  END 
PP  350  INPUT#15,E1?,E25,E35,E4 

S:IP  E1$="00"THENRETURN 
MP  360  PRINT  CHRS(18);E1?", "E2 

5",  "E35", "E4?:CL0SES:RE 

TURN 
MC    370    T=P0S(T> 
FF    380    FORJ=0TO25 iWAIT    197,64: 

NEXT: POKE    199,0: PRINT    T 

AB(T) 
AJ    390    N5="": INPUT    N5:IF    NS="" 

THENPRINT: PRINT : PRINT : G 

OTO3B0 
AS  400  RETURN 
KS   410    DATA    16  2,0,189,18,48,15 

7,0,96 
BG    420    DATA    189,18,49,157,0,97 

,232,208 
XK  430  DATA  241,96,0,0,0,0,0,0 
CK  440  DATA  0,0,4,93,255,0,227 

,167 
KB  450  DATA  115,164,0,0,0,0,0, 

0 
RM  460  DATA  0,0,0,0 
KK  470  DATA  0,0,0,0 
FJ  480  DATA  0,0,0,0 
BX  490  DATA  0,0,0,0 
JJ  500  DATA  0,0,0,0 
EX  510  DATA  0,0,0,0. 
AS  520  DATA  0,0,0,0 
DX  530  DATA  0,0,162 

2,7,189 
KH  540  DATA  8,255,72,202,16,24 

9,64,162 
MG  550  DATA  47,224,32,176,12,1 

89,16,255 
KJ  560  DATA  157,48,253,189,48, 
255,157,16 

MM  570  DATA  245,189,196,255,15 

7,0,2,202 
KQ  580  DATA  16,231,173,11,255, 


,0, 

0 

0, 

,0 

0 

0, 

,0 

0 

0, 

,0 

0 

0, 

,0 

0 

0, 

,0 

0 

,0, 

,0 

,0 

,0, 

,250 

,15 

,0 
,0 
,0 
,0 
,0 
,0 
,0 

154,16 


208,14,173 
CC  590  DATA  2,255,105,1,133,45 

,173,3 
HG  600  DATA  255,105,8,133,46,1 

74,4,255 
XG  610  DATA  172,5,255,134,251, 

132,252,174 
KD  620  DATA  6,255,172,7,255,13 

4,253, 132 
GM  630  DATA  254,160,0,174,3,25 

5,240,14 
PX  640  DATA  177,251,145,253,20 

0,208,249,230 
SO  650  DATA  252,230,254,202,20 

8,242,174,2 
EE  660  DATA  255,240,8,177,251, 

145,253,200 
CF  670  DATA  202,208,248,76,0,2 

,169,55 
CM  680  DATA  133,1,88,169,0,32, 

189,255 
JG  690  DATA  169,15,168,162,8,3 

2,186,255 
CQ  700  DATA  32,192,255,169,15, 

32,195,255 
CG  710  DATA  104,208,11,32,51,1 

65, 162,44 
DA  720  DATA  160,2,134,122,132, 

123,169,13 
PC  7  30  DATA  76,210,2  5  5,138,0,0 

,0,0 
RH  740  DATA  0,0,0,0,92,255,92, 

255 
KR  750  DATA  80,255,47,53,173,1 

78,97,73 
XG  760  DATA  255,141,178,97,174 

,179,97,172 
PC  770  DATA  180,97,134,251,132 

,252,162,5 
PB  780  DATA  32,198,255,32,228, 

255,141,6 
ME  790  DATA  96,32,228,255,141, 

7,96,160 
GF  800  DATA  0,32,228,255,44,17 

8,97,48 
JK  810  DATA  7,145,251,44,178,9 

7,16,22 
XM  820  DATA  238,2,96,208,3,238 

.3,96 
QA  830  DATA  56,173,179,97,233, 

1,141,179 
PR  840  DATA  97,176,3,206,180,9 

7,32,183 
EF  850  DATA  255,41,64,208,8,20 

0,208,209 
PB  860  DATA  230,252,76,37,97,1 

73,178,97 
RQ  870  DATA  240,19,56,173,181, 

97,237,2 
DM  880  DATA  96,141,4,96,173,18 

2,97,237 
DF  890  DATA  3,96,141,5,96,76,2 

04,255 
JQ  900  DATA  56,169,0,237,2,96, 

133,251 
HD  910  DATA  169,96,237,3,96,13 

3,252, 162 
BA  920  DATA  5,32,201,255,173,4 

,96,32 
KA  930  DATA  210,255,173,5,96,3 

2,210,255 
MG  940  DATA  160,0,177,251,32,2 

10,255,230 
GH  950  DATA  251,208,2,230,252, 

165,252,201 
QG  960  DATA  97,208,239,165,251 

,201,2,208 
SX  970  DATA  233,76,204,255,0,0 

,96,0 
AP  980  DATA  25  5  © 
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Upgrading  The 
Apple  ESCape  Key 


With  this  short  routine,  you  can  re- 
program  the  Apple's  ESCape  key  (or 
any  other  key)  to  perform  a  variety  of 
special  functions  within  Applesoft 
BASIC.  It  works  with  any  Apple  II- 
series  computer  using  Applesoft  BASIC 
and  DOS  3.2,  DOS  3.3,  or  ProDOS. 


Have  you  ever  wished  you  could 
detect  special  escape  codes  in 
Applesoft  BASIC?  For  instance,  say 
that  you  have  an  Applesoft  pro- 
gram that  uses  INPUT  to  ask  you 
for  a  disk  filename.  In  many  cases, 
it  would  be  handy  to  view  the  disk 
catalog  before  entering  the  file- 
name. But  that's  impossible  under 
normal  circumstances — you  can't 
type  a  CATALOG  command  while 
the  computer's  waiting  for  a  re- 
sponse to  INPUT. 

"ESCape  Key  Upgrade,"  listed 
below,  lets  you  add  a  special  escape 
key  function  to  display  the  catalog 
automatically  whenever  you  press 
ESCape,  With  a  little  extra  pro- 
gramming, you  can  use  the  same 
routine  to  give  special  meaning  to 
any  other  key  or  keypress  sequence 
on  your  Apple  II  computer. 

Hit  ESC  For  A  CATALOG 

Type  in  and  save  Program  1,  then 
run  it  for  a  demonstration.  The  first 
ten  lines  install  and  activate  a  short 
machine  language  routine;  line  110 
performs  an  ordinary  INPUT  com- 
mand. When  the  INPUT  prompt 
appears,  press  ESC.  The  computer 
immediately  displays  a  disk  cata- 
log, just  as  if  you'd  stepped  outside 
program  mode  for  a  moment  and 


Robert  Jacques  Beck 


typed  CATALOG  in  immediate 
mode.  Of  course,  you're  not  limited 
to  a  catalog  display;  by  substituting 
different  commands  after  the 
THEN  statement  in  line  120,  you 
can  perform  other  commands, 
branch  to  a  subroutine,  or  do  what- 
ever else  you  like. 

The  ESC  key  is  ideally  suited 
for  this  purpose,  since  it's  located 
near  the  upper-left  comer  of  the 
keyboard  and  is  rarely  used  except 
for  editing.  Program  1  checks  ESC 
after  an  INPUT  statement,  but  this 
technique  works  just  as  well  after 
any  GET  statement.  If  you  want  a 
program  to  respond  to  ESC  more 
quickly,  you  needn't  wait  for  an 
INPUT  or  GET,  Try  the  technique 
known  as  polling  (periodically  test- 
ing) the  keyboard.  For  instance, 
your  program  might  call  the  follow- 
ing subroutine  at  regular  intervals: 

900  IF  PEEK  (-16384)  <  128  TH 
EN  RETURN:  REM  RETURN  IF 
NO  KEY  WAS  PRESSED 

910  POKE  -1636B,0 

920  IF  PEEK  (-16384)  =  27  THE 
N  PRINT  CHR»(4)  "CATflLOG" 

930  RETURN 

The  first  line  of  this  routine 
checks  whether  a  key  has  been 
pressed  since  the  last  keyboard 
check  was  made.  Only  if  the  answer 
is  yes  does  the  routine  go  on  to  test 
for  the  ESC  key  specifically  (this 
prevents  the  computer  from  react- 
ing twice  to  the  same  keypress). 
With  this  routine  in  place,  you  can 
check  ESC  whenever  you  like  by 
inserting  GOSUB  900  at  the  appro- 
priate spot  in  a  program. 


Checking  Other  Keys 

Testing  for  keys  other  than  ESC  is 
quite  easy.  Take  a  look  at  line  60  of 
Program  1.  The  second  value  in  the 
DATA  statement  represents 
CHR$(27),  the  ASCII  value  of  the 
ESC  key.  To  test  for  a  different  key, 
replace  the  27  in  line  60  with  the 
ASCII  code  of  the  desired  key,  then 
make  the  same  substitution  in  line 
120  as  well.  For  example,  to  test  for 
the  letter  A  instead  of  ESC,  substi- 
tute a  65  for  27  in  lines  60  and  120, 
If  you  rerun  the  program  and  press 
A  at  the  INPUT  prompt,  the  com- 
puter displays  a  disk  catalog  exactly 
as  before. 

What  about  reprogramming 
more  than  one  key  at  a  time?  Let's 
check  for  three  special  key  combina- 
tions: The  ESC  key  will  display  the 
catalog  for  drive  1,  CTRL- A  will  cat- 
alog drive  2,  and  CTRL-C  will  home 
the  cursor.  The  first  step  is  to  add 
these  lines  to  Program  1  (note  that 
line  1 20  is  replaced  with  a  new  line): 

58  DflTfl  201,1,240,10  :  REM  CO 
NTROL  A 

59  DATA  201,3,240,6  : REM  CONT 
RDL  C 

120  IF  PEEK  (-16384)  =  27  THE 
N  PRINT  CHR*(4)  "CATALOG, 
Dl":  GOTO  110 
130  IF  PEEK  (-16384)  =  1  THEN 
PRINT  CHR«(4)  "CATALOG,!) 
2":  GOTO  110 
140  IF  PEEK  (-16384)  =  3  THEN 
HOME:  GOTO  110 

The  second  number  in  each 
DATA  statement  represents  the 
ASCII  code  for  a  particular  keypress. 
The  last  number  in  each  DATA 
statement  must  equal  the  last  num- 
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ber  in  the  following  line  plus  4;  since 
line  59  ends  with  the  value  6,  line  58 
must  end  with  the  value  10  (6  +  4), 
and  so  forth.  Lines  130  and  140  add 
the  IF  statements  needed  to  test  for 
CTRL-A  and  CTRL-C.  Following 
this  pattern,  you  can  add  your  own 
key  definitions. 

Reprogrammed  keys  behave 
just  like  the  RETURN  key,  causing 
INPUT  to  respond  immediately. 
However,  there  are  some  minor  re- 
strictions. First,  in  a  multiple  IN- 
PUT command  such  as  INPUT 
A$,B$,C$,  the  computer  detects  re- 
programmed  keys  only  after  the 
last  entry  (C$  in  this  case).  Second, 
if  the  INPUT  command  expects  nu- 
meric input,  you  must  always  enter 
some  number  before  typing  the 
special  key. 

One  disadvantage  of  checking 
for  ESC  is  that  normal  ESC  editing 
functions  are  disabled.  The  normal 
keyscan  can  be  restored  by  pressing 
CTRL-RESET,  but  it's  better  form 
for  your  program  to  leave  the  com- 
puter in  its  standard  state  when  it 
ends.  To  accomplish  this,  add  the 
appropriate  line  below  to  your  pro- 
gram at  a  point  just  before  the  end: 

For  DOS  3.2  or  3.3: 

POKE  56,27:POKE  57,253:CALL  1002 

For  ProDOS: 

PRINT  CHR$(4);'aN#0" 

A  Short  Diversion 

Though  you  can  use  this  routine 
without  knowing  how  it  works, 
machine  language  programmers 
may  appreciate  a  closer  examina- 
tion. In  simple  terms,  it  diverts  the 
computer  from  its  normal  keyscan 
routine  to  a  new  one  that  we  install 
in  RAM.  To  understand  the  details 
of  this  process,  you'll  need  to  know 
something  about  how  the  Apple's 
keyboard  is  normally  scanned. 

The  Apple  reads  its  keyboard 
with  a  routine  known  as  RDCHAR 
(located  at  $FD35).  RDCHAR  in 
turn  calls  another  routine  known  as 
RDKEY  which  retrieves  an  ASCII 
code  from  the  keyboard  and  stores 
it  in  the  microprocessor's  accumu- 
lator. Then  the  computer  adds  128 
to  the  key  code  and  stores  the  re- 
sulting value  in  the  keyboard  data 
byte  (location  $C000,  which  is  ex- 
pressed in  decimal  integer  form  as 
-16384).  You  can  subtract  128 
from  the  keyboard  data  byte  with  a 
GET,  an  INPUT,  or  by  PEEKs  or 


POKEs  to  the  keyboard  status  byte; 
Apple  calls  this  location  ($C010  or 
decimal  —16386)  the  keyboard 
strobe.  After  RDKEY  is  finished, 
RDCHAR  checks  to  see  if  the  key 
pressed  was  the  ESC  key.  If  so,  it 
branches  to  a  special  routine.  The 
ESC  keypress  itself  is  always  ig- 
nored except  as  a  signal  indicating 
that  the  next  keypress  should  be 
processed  specially — as  an  escape 
code  rather  than  a  normal  keypress. 
Instead  of  obtaining  the  key- 
code  on  its  own,  RDKEY  jumps  to 
yet  another  routine,  KEYIN,  which 
actually  does  the  work.  KEYIN  or- 
dinarily begins  at  location  $FD1B. 
This  final  bit  of  code  is  not  called  as 
a  subroutine;  instead,  the  computer 
performs  an  indirect  jump  instruc- 
tion, passing  control  to  the  address 
stored  in  zero  page  locations  56-57 
($38-$39).  Apple  documentation 
refers  to  this  pair  of  locations  as  the 
keyboard  input  switch.  The  impor- 
tant points  to  remember  are  that  the 
keyboard  data  byte  (  —  16384)  can 
be  PEEKed  from  BASIC,  and  that 
you  can  divert  the  computer  to  a 
different  keyscan  routine  by  chang- 
ing two  bytes  in  zero  page. 

Replacing  the  ROM  version  of 
KEYIN  with  a  customized  version  is 
straightforward.  Lines  10-70  of 
Program  1  POKE  the  new  routine 
into  memory  beginning  at  address 
768.  Line  80  checks  a  memory  loca- 
tion in  the  ProDOS  global  page, 
which  begins  at  address  48640.  If 
this  location  contains  the  value  76, 
ProDOS  is  active,  so  the  standard 
input  routine  is  changed  using  the 
command  IN#A768,  which  tells 
ProDOS  to  get  its  input  from  the 
routine  beginning  at  address  768. 
(That  routine  begins  with  a  byte  of 
216,  the  CLD  opcode,  to  let  Pro- 
DOS  know  that  this  is  a  valid  ma- 
chine language  routine.) 

Lines  90  and  100  perform  the 
input  redirection  for  DOS  3.2  and 
3.3.  First,  the  high  and  low  bytes  of 
the  routine's  starting  address  ($300, 
or  decimal  768)  are  POKEd  into 
locations  56  and  57.  (Since  this  rou- 
tine is  relocatable,  you  could  put  it 
any  other  place  that  isn't  used  by 
your  main  program.)  Then  the 
CALL  1002  in  line  100  tells  DOS  to 
use  the  new  KEYIN  routine  in  place 
of  the  usual  code.  If  you're  interest- 
ed, Program  2  contains  the  source 
code  for  this  routine. 


The  first  instruction  in  Pro- 
gram 2  is  necessary  for  ProDOS. 
The  next  eight  lines  simply  mimic 
the  normal  KEYIN  routine.  These 
instructions  continuously  generate 
a  random  number  by  incrementing 
locations  $4E-$4F  until  a  key  is 
pressed.  When  you  press  a  key,  the 
computer  moves  the  keycode  found 
in  the  keyboard  data  byte  into  the 
accumulator,  then  clears  the  key- 
board status  byte.  At  that  point,  the 
normal  version  of  KEYIN  would  re- 
turn to  RDCHAR,  which  would 
check  the  keycode  to  see  if  it  is  ESC. 
The  custom  KEYIN  routine  does 
the  check  right  away.  If  ESC  was 
pressed,  we  replace  the  accumula- 
tor's contents  with  the  ASCII  code 
for  a  carriage  return  (with  the  high 
bit  set). 

Program  1 :  ESCape  Key 
Upgrade 

For  instructions  on  entering  this  listing,  pleose 
refer  to  "COMPUTEI's  Guide  to  Typing  In 
Programs"  in  this  Issue  of  COMPUTEi. 

flC    10    J    =    768 

2F  20  REftD  A:  IF  fl  <  >  25t  THEN 

POKE  J,fi:J  =  J  +  l£  BDTO  2 

0 
31  30  DATA  216,230,78,208,2,230, 

79,44,0 
IE  40  DATA  192,16,245,145,40,173 

,0,192 
BE  50  DATA  44,16,192,72,41,127 
«7  60  DATA  201,27,240,2  :  REM  E3 

CAPE  KEY 
a   70   DATA  104,96,104,169,141,96 

,256 
a   80  IF  PEEK  (190  *  256)  =  76  T 

HEN  PRINT  CHR*  (4)j"IN#A76 

B":  DOTO  110 
JD  90  POKE  56,0:  POKE  57,3 
92  100  CALL  1002 

2E  110  INPUT  "ENTER  CHOICE  " ;  ft» 
CC  120  IF  PEEK  <  -  163B4)  =  27  T 
HEN  PRINT  CHR*  (4) "CATALO 
B":  GOTO  110 

Program  2:  New  KEYIN 
Routine 

This  source  code  listing  is  for  illus- 
trative purposes  only.  It  requires  an 
assembler  to  be  typed  in. 


START 


NEXT 


RETURN 


CLD  ; 

1NC$4E 

BNE  NEXT 

INCS4F 

BIT  $COI)0 

BFL  START 

STA  ($28),Y 

LDA  SCOOO 

BIT  SCOIO 

PHA 

AND  #$7F 

CMP  #$1B 

BEQ  RETURN 

PLA 

RTS 

PLA 

LDA  #S8D 

RTS 


Valid  ML  routine. 


Save  key  code 
Set  high  bit  to  zero 
Is  it  ESC? 
If  yes,  branch. 
Not  ESC,  so  replace 
original  code,  exit. 
Tidy  up  stack. 
Carriage  return. 
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INSIGHT:  ST 


Bill  Wilkinson 


Exploring  The  ST 


Hi — welcome  to  "Insight:  ST," 
COMPUTEi's  new  monthly  column 
for  the  Atari  ST-series  computers. 
Over  the  coming  months,  we're  go- 
ing to  help  you  become  more  famil- 
iar with  the  ins  and  outs  of  the  Atari 
ST,  its  operating  system,  GEM,  and 
ST  BASIC.  The  ST  series  is  the  most 
powerful  line  of  computers  ever  re- 
leased by  Atari — one  of  the  most 
powerful  in  the  industry,  in  fact — 
so  there's  a  great  deal  to  learn  and 
explore. 

Before  getting  started,  I  want  to 
reassure  those  of  you  who  still  own 
and  use  the  eight-bit  Atari  400/ 
800,  XL,  and  XE  computers.  Veter- 
an readers  will  recognize  that  I've 
been  writing  the  "Insight:  Atari" 
column  on  these  machines  for  the 
past  five  years  in  COMPUTE!,  This 
new  column  does  not  mean  that 
we're  dropping  Insight:  Atari.  In 
fact,  1  plan  to  continue  writing  In- 
sight: Atari  in  addition  to  Insight: 
ST  for  the  next  few  months.  Even- 
tually I'll  turn  over  Insight:  ST  to 
someone  more  specialized  in  ST 
BASIC.  Don't  be  surprised,  though, 
to  find  occasional  ST  tidbits  in  In- 
sight: Atari  as  well.  Both  columns 
will  be  of  continuing  interest  to  all 
Atari  enthusiasts. 

The  ST  In  Perspective 

Just  what  is  an  Atari  ST  computer? 
Even  if  you  already  own  an  ST,  I 
may  have  some  surprising  answers 
for  you. 

From  a  hardware  viewpoint, 
the  ST  is  most  commonly  compared 
to  the  Apple  Macintosh  and  the 
Commodore  Amiga.  Indeed,  it 
shares  characteristics  with  both.  All 
three  use  a  Motorola  68000-series 
microprocessor,  3'/2-inch  floppy 
disk  drives,  bit-mapped  screen  dis- 
play, a  range  of  peripheral  inter- 
faces, and  more — generally  the 
things  we've  come  to  expect  from 
today's  advanced  personal  comput- 
ers. Both  the  ST  and  the  Amiga 
have  one  advantage  over  the  Mac- 


intosh: color  graphics  (though  ad- 
mittedly only  the  Amiga  uses  a 
sophisticated  graphics  processor 
chip  to  display  true  sprites). 

Even  the  user  interfaces  of  the 
three  machines  are  similar:  All  have 
a  system  of  icons,  multiple  screen 
windows,  and  a  mouse  controller  to 
visually  display  and  manipulate  the 
contents  of  disks  and  perform  gen- 
eral "maintenance"  chores. 

Finally,  as  long  as  we're  mak- 
ing comparisons,  we  should  be  fair 
and  menhon  that  the  Macintosh 
has  much,  much  more  software 
available  for  it  than  either  of  its 
competitors.  But  that  situation  is 
changing  rapidly,  even  as  1  write, 

What  makes  the  ST  stand  out 
from  other  computers?  Well,  the 
Atari  marketing  department  has  a 
whole  series  of  answers,  but  let  me 
tell  you  the  ones  which  impress  me. 
First  and  foremost  is  the  built-in 
hard  disk  port.  It's  capable  of  trans- 
ferring data  to  or  from  a  hard  disk 
(or  a  network  or  external  RAM  disk 
or  whatever)  at  a  rate  of  up  to 
1,300,000  bytes  per  second.  That 
means  you  could,  in  theory,  fill  the 
512K  RAM  memory  of  a  520ST  in 
under  half  a  second. 

The  Allure  Of  Speed 

Theory  is  nice,  but  what  does  this 
mean  in  practice?  Well,  for  me  (or 
any  other  programmer)  it  means 
that  after  writing  source  code  with  a 
text  editor,  I  can  save  the  source  file 
to  disk,  exit  the  editor,  load  a  com- 
piler, compile  the  source  code  1  just 
saved,  link  the  resulting  object  code 
with  both  system  and  GEM  librar- 
ies, and  maybe  (if  1  swallow  fast) 
finish  eating  a  bite  or  two  of  a  sand- 
wich. Elapsed  time:  between  10  and 
15  seconds,  depending  on  the  size 
of  the  program.  On  an  IBM  PC  with 
a  hard  disk,  it  would  take  four  to  six 
times  as  long.  And  on  the  Macin- 
tosh, most  external  hard  disks 
aren't  much  faster  than  the  ST's 
floppies. 


Thanks  to  its  fast  processor  and 
amazing  hard  disk  speed,  for  sheer 
con\puting  power  there  is  probably 
no  "home"  computer  available 
which  can  touch  the  ST.  Exception; 
If  you're  doing  heavy  work  with 
floating-point  math  (for  example, 
scientific  or  engineering  comput- 
ing), an  IBM  PC  with  8087  floating- 
point chip  will  win  hands  down. 
(Are  you  listening,  Atari?) 

The  only  other  hardware  fea- 
tures which  are  distinctively  Atari 
are  the  built-in  MIDI  (Musical  In- 
strument Digital  Interface)  ports, 
the  cartridge  slot,  and  the  absolute- 
ly beautiful  black-and-white  dis- 
play. Now  MIDI  will  be  of  interest 
to  musicians,  and  the  cartridge  port 
may  have  some  interesting  future 
applications  (perhaps  a  way  to  get 
that  fast  floating-point  chip?),  but 
the  surprise  here  is  the  640  X  400 
monochrome  display.  Why  do  I 
rave  about  this  on  a  machine  with 
advanced  color  graphics? 

Although  1  enjoy  color  dis- 
plays, I  will  probably  never  create 
one.  I'm  not  particularly  artistic  and 
I  don't  write  games.  But  1  do  write 
programs.  Which  means  I  appreci- 
ate an  easy  to  read,  rock-steady  dis- 
play. Atari  went  to  the  trouble  to 
equip  the  ST  with  a  completely  sep- 
arate monochrome  video  port,  and 
its  quality  is  nothing  short  of  amaz- 
ing. And,  besides,  it  costs  $200  less 
than  a  color  system.  (But  be  fore- 
warned: Many  games  only  run  on  a 
color  monitor.  Poor  software  de- 
sign, in  my  opinion,  but  that's  how 
it  is,) 

Next  month,  we'll  begin  turn- 
ing the  Atari  ST  inside  out  and  ex- 
ploring the  intricacies  of  TOS,  its 
multilevel  operating  system,         @ 
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AmigaView 
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Chorles  Brannon 


New  Amiga  Software 


Welcome  to  the  premiere  of  com- 
puter's Amiga  column.  For  the  last 
two  years,  I've  been  writing  "Hori- 
zons," a  Commodore  column  in 
COMPUTEl's  GAZETTE,  and  I'm  very 
excited  to  be  writing  a  new  column 
for  the  Amiga.  While  other  publica- 
tions concentrate  primarily  on 
Amiga  reviews  and  using  your 
Amiga  with  commercial  software, 
this  column  will  have  a  strong  bent 
toward  programming  techniques, 
tricks,  and  tips. 

Nonprogrammers  will  find 
information  on  using  the  operating 
system  (both  the  Workbench  and 
AmigaDOS)  to  its  fullest.  We'll  also 
pass  along  late-breaking  Amiga 
developments. 

Amiga  Steals  The  Show 

Although  Commodore  didn't  ex- 
hibit at  the  recent  Comdex  or  Win- 
ter Consumer  Electronics  Show,  the 
Amiga  did  make  a  big  appearance 
in  early  February  at  The  Commo- 
dore Show  II  in  San  Francisco.  This 
show  was  hosted  by  the  West  Coast 
Commodore  Association,  one  of 
the  largest  Commodore  user 
groups.  Thousands  of  enthusiastic 
Commodore  owners  turned  out  to 
look  at  the  latest  offerings  of  soft- 
ware and  hardware  companies.  In 
fact,  the  show  was  so  popular  that 
the  fire  marshal  finally  had  to  lock 
the  doors  to  prevent  the  crowd 
from  exceeding  the  building's  occu- 
pancy limit. 

About  half  the  show  was  dedi- 
cated to  the  Amiga,  and  the  Amiga 
was  clearly  the  show-stealer.  Com- 
modore sponsored  a  large  booth 
which  was  lent  to  developers  for 
product  demonstrations.  This  was 
the  first  time  many  Commodore 
owners  got  a  chance  to  see  the 
Amiga  working  with  actual  soft- 
ware instead  of  the  same  old  demo 
programs,  so  there  was  quite  a  bit  of 
interest.  And  more  than  a  few  peo- 
ple at  the  show  were  Amiga  owners 
themselves,  scouring  the  floor  for 


everything  they  could  find. 

They  didn't  go  home  empty- 
handed.  Lots  of  companies  were 
displaying  their  latest  Amiga  wares. 
(Keep  in  mind  that  I'm  writing  this 
column  in  mid-February,  so  check 
with  your  dealer  on  the  availability 
of  promised  titles.) 

Activision  wowed  showgoers 
with  The  Music  Studio,  a  complete 
music  composition  system.  Using 
Commodore's  MIDI  (Musical  In- 
strument Digital  Interface)  adapter, 
the  Amiga  and  The  Music  Studio 
were  playing  a  complex  nine-part 
harmony  on  a  keyboard  synthesiz- 
er. Besides  MIDI  compatibility,  oth- 
er features  of  The  Music  Studio  are  a 
sound  editor/synthesizer,  standard 
music  notation,  beginner's  music 
notation,  a  sound  library,  up  to  15 
instruments  per  song,  full  editing 
capability,  a  staff  that  scrolls  during 
play,  and  the  ability  to  print  out 
lyrics  along  with  the  sheet  music. 
Many  of  these  options  are  accessi- 
ble from  pull-down  menus.  The 
suggested  retail  price  is  $59.95. 

From  C  To  Shining  C 

Aztec  C,  by  Manx  Software  (Eaton 
Town,  New  Jersey),  is  a  new  alter- 
native to  Lattice  C  which  supposed- 
ly compiles  faster  and  generates 
smaller,  faster-running  code  than 
the  Lattice  compiler.  With  its  built- 
in  libraries,  Aztec  C  is  compatible 
with  all  Amiga  function  calls.  A 
new  translation  utility  lets  you 
translate  existing  Lattice  source 
code  to  Aztec  C.  Aztec  C  is  available 
in  several  levels,  from  a  simple 
bare-bones  C  system  for  beginners 
who  want  to  learn  C  to  the  full- 
power  Commercial  System  de- 
signed for  developers  writing 
commercial  software. 

A  couple  of  companies  were 
taking  orders  for  their  memory  ex- 
pansion boards.  Skyles  Electric 
Works  (Mountain  View,  California) 
sells  a  25  6K  module  that  plugs  into 
the  front  memory  port  for  $149,95. 


Comspec  Communications  (Toron- 
to, Ontario)  sells  a  256K  board  for 
$130  and  offers  two  megabytes 
(2,048K)  for  $1,196.  StarPoint  Soft- 
ware (Yreka,  California)  sells  a 
256K  board  for  $120,  and  it  even 
comes  with  the  schematics. 

Two  companies  are  introduc- 
ing touch  tablets  for  the  Amiga. 
These  flat  pads  let  you  draw  with  a 
pen  to  transmit  screen  coordinates 
to  the  Amiga.  You  can  use  the  pad 
as  a  substitute  for  the  mouse  with 
graphics  software  for  more  natural 
freehand  drawing  and  effortless 
tracing.  Kurta  Corp.  (Phoenix,  Ari- 
zona) sells  a  full  line  of  digitizer 
pads,  from  the  $375  Penmouse+  to 
a  drafting-table  size  professional 
system.  Software  is  included  to  in- 
terface the  tablet  with  the  Amiga 
operating  system.  Anakin  Research 
(Rexdale,  Ontario)  has  a  high- 
resolution  tablet  called  the  EASYL 
with  software  that  works  in  all 
Amiga  screen  modes.  In  640  X  400, 
it's  a  lot  like  drawing  with  a  pen  on 
a  white  piece  of  paper.  It  also  works 
with  Electronic  Art's  Deluxe  Paint. 
It  sells  for  around  $500. 

Micro-Systems  Software  (Boca 
Raton,  Florida)  is  selling  Analyze!,  a 
spreadsheet  ($99.95),  Online!,  an 
already-popular  telecommunications 
program  ($69.95),  and  BBS-PC,  a 
bulletin  board  system  that  lets  any- 
one with  an  auto-answer  modem 
set  up  their  own  BBS  ($99.95).  All 
three  packages  are  available  now. 

I've  seen  a  list  of  over  100 
Amiga  products  that  are  promised 
by  the  first  quarter  of  1986.  Even 
more  projects  are  under  develop- 
ment and  "soon  to  come."  As  more 
machines  sell,  and  as  more  prod- 
ucts jell,  the  Amiga  will  escape  this 
temporary  shortage  of  software  and 
expansion  hardware.  Every  ma- 
chine has  had  to  run  this  gauntlet, 
but  the  Amiga  may  emerge  as  a 
particularly  strong  runner.  © 
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Telecomputing  Today 


Arlan  Q.  Levitan 


Online  Etiquette 


Manners  are  "in"  this  year.  Since  I 
can't  turn  on  a  television  or  radio 
without  running  into  a  self-styled 
expert  on  genteel  behavior,  I  figure 
I  might  as  well  get  into  the  act  with 
my  patented  "Proper  Pointers  for 
Bulletin  Board  Paparazzi." 

When  logging  onto  a  BBS,  re- 
member that  you  are  a  guest  in  the 
system  operator's  (sysop's)  elec- 
tronic house.  Sysops  have  the  right 
to  lay  whatever  ground  rules  they 
see  fit  for  their  personal  domains.  If 
you  have  any  problems  with  the 
house  rules,  feel  free  to  register  a 
mild-mannered  and  polite  com- 
plaint with  the  management,  but  be 
prepared  to  find  another  game  in 
town  more  to  your  liking  if  the 
house  does  not  relent. 

Give  your  real  name  when 
asked  to  log  in.  Using  the  name  of 
heavy  metal  groups,  five-letter  ex- 
pletives, or  such  hackneyed  titles  as 
"Hacker,"  "Cracker,"  or  "Whack- 
er" are  considered  passe  and  a  har- 
binger of  the  imminent  demise  of 
the  rest  of  your  brain  cells.  If  the 
bulletin  board  you  are  accessing  en- 
courages the  use  of  noms-de-plume, 
stick  with  an  obscure  or  bizarre 
moniker.  My  favorites  are  the 
names  of  ex-postal  ministers  of 
Liechtenstein. 

Don't  be  a  data  glutton.  Down- 
loading every  new  file  that  shows 
up  on  a  BBS  may  keep  you  off  the 
streets,  but  ties  up  many  boards  an 
inordinate  amount  of  time.  Logging 
off  and  back  on  with  a  different 
name  after  your  time  limit  has  ex- 
pired is  tantamount  to  hogging  the 
shower  until  all  of  the  hot  water  is 
gone.  Show  your  discrimination 
and  taste  by  carefully  examining 
the  descriptions  of  files  that  are 
available  for  downloading,  and 
choose  only  those  that  are  of  real 
interest  or  utility  to  you. 

Anyone  Need  A  Ginsu? 

If  there  is  a  message  section  on  the 
BBS,  make  an  effort  to  read  the 


latest  messages  and  participate  in 
the  flow  of  conversation.  The  con- 
tent of  messages  you  leave  should 
be  consistent  with  any  statement  of 
direction  that  the  sysop  has  estab- 
lished. The  right  of  free  speech  not- 
withstanding, leaving  a  message 
offering  to  trade  a  set  of  Ginsu 
knives  for  a  Veg-A-Matic  may  be 
considered  a  breach  of  protocol  on 
a  board  dedicated  to  discussions  of 
artificial  intelligence  and  the  search 
for  UFOs. 

Try  to  instill  some  degree  of 
content  into  every  message  you 
leave.  Politeness  is  a  virtue,  but  re- 
sponding to  every  bit  of  assistance 
with  the  single  word  "Thanks" 
wastes  pointer  space  within  the 
BBS  indexes  and  often  leaves  other 
folks  wondering  just  what  you  were 
thanking  someone  for  when  the 
original  message  rolls  off  the  mes- 
sage base. 

Leaving  public  messages  that 
give  away  solutions  to  particularly 
difficult  problems  in  the  latest  ad- 
venture game  is  somewhat  less 
sporting  than  standing  in  front  of 
the  audience  at  a  movie  theater  and 
announcing  the  conclusion  before 
the  film  begins.  If  you  must  request 
help  with  such  programs,  solicit  as- 
sistance in  the  form  of  a  phone  call 
or  letter. 

Obscenity  is  not  only  "out," 
it's  boring.  Ask  anyone  who's  read 
the  unexpurgated  Watergate  tran- 
scripts. Questioning  the  lineage  of 
the  sysop  or  attempting  to  crash  the 
board  because  you  don't  like  a  par- 
ticular policy  or  rule  is  a  waste  of 
your  time  and  as  welcome  as  an  IRS 
audit. 

Sibling  Rivalry 

Perhaps  the  most  difficult  thing  for 
many  people  is  abstaining  from  the 
various  "My  computer  is  bigger/ 
better/faster  than  yours"  message 
threads.  These  discussions  usually 
exhibit  all  the  charm  of  a  dozen  or 
so  bull  elks  ramming  their  heads 


together  during  the  rutting  season. 

The  most  recent  examples  are 
the  dozens  of  Amiga  versus  Atari 
ST  shouting  matches  that  have 
been  jamming  both  public  bulletin 
boards  and  commercial  information 
services  all  over  the  country.  For 
the  most  part,  the  opposing  sides 
are  made  up  of  loyal  Atari  and 
Commodore  followers  who  are 
anxious  to  defend  the  honor  of  their 
long-time  corporate  allegiances — 
holdovers  from  the  Atari  800  versus 
Commodore  64  debates.  What 
makes  all  of  these  arguments  and 
insults  somewhat  ludicrous  is  that 
the  Amiga's  custom  chips  are  large- 
ly the  work  of  Jay  Miner,  who  de- 
signed the  graphics  chips  in  the 
Atari  2600  and  eight-bit  Atari  com- 
puters. So  the  Amiga  is  actually  a 
mid-1980s  Atari,  while  the  Atari  ST 
computers — the  product  of  Jack 
Tramiel  &  Sons — are  really  mid- 
1980s  Commodores. 

If  all  the  energy  that  has  been 
spent  on  these  types  of  discussions 
were  channeled  into  more  produc- 
tive pursuits,  I  have  no  doubt  that 
many  of  the  real  mysteries  of  the 
universe  could  have  been  solved — 
including  where  all  of  the  jackets  for 
my  floppy  disks  keep  vanishing  to, 

Finally,  and  perhaps  most  im- 
portant, is  to  cultivate  an  attitude  of 
gentle  tolerance  toward  those  who 
insist  on  pontificating  and  regaling 
you  with  their  personal  vision  of 
the  "right"  way  to  do  things.  Hav- 
ing made  it  through  this  list  of  dos 
and  don'ts,  you're  well  on  your 
way  to  that  end.  9 


The  World  Inside  the  Computer 

Fred  D'Ignozio,  Associate  Editor 


Training  For  Tomorrow's  Jobs: 
High-Tech  Skills  And  Beyond 


The  reindustrialization  of  the  United 
States  is  underway.  The  U.S.  econ- 
omy is  rapidly  modernizing  its 
smokestack  industries  and  convert- 
ing them  to  futuristic,  high-tech 
companies.  High-tech  tools — in- 
cluding robots,  computers,  office 
automation,  and  telecommunica- 
tions— are  steadily  becoming  part 
of  the  daily  working  environment 
iri  most  U.S.  companies.  According 
to  a  recent  issue  of  the  Kiplinger 
Washington  Letter,  "Even  old-line 
manufacturers  are  becoming  high- 
tech  companies,  using  computers  to 
orchestrate  what  goes  on  where 
and  when  in  their  plants.  Formerly 
machines  replaced  brawn.  Now 
they  replace  brains  or  skilled  help." 

For  instance,  in  Rochester, 
Michigan,  just  east  of  Pontiac,  older 
companies  are  swiftly  going  high- 
tech.  Electronic  Data  Systems,  re- 
cently acquired  by  General  Motors, 
is  transferring  operations  to  Roch- 
ester. Chrysler  Labs  is  expanding  its 
operations.  And  a  multimillion- 
dollar  high-tech  industrial  park  is 
under  construction. 

That  means  new  jobs  are  open- 
ing up  in  Rochester.  But  are  Roch- 
ester's schoolchildren  receiving  the 
training  they'll  need  for  these  jobs? 

High-Tech  Thinking 

Rochester  already  has  more  com- 
puters in  its  schools,  per  capita, 
than  any  other  city  in  the  country. 
However,  according  to  Dr.  Anne 
Porter  Jaworski,  a  teacher  at  Roch- 
ester's Oakland  University,  "Train- 
ing on  computers  and  other  high- 
tech  machines  will  not  guarantee 
future  jobs  for  our  children.  We 
must  also  teach  our  children  high- 
er-level thinking  and  communica- 
tions skills.  By  the  time  they 
become  adults,  all  other  skills  will 
be  automated,  and  the  jobs  will  be 
done  by  machines." 

Jaworski's  Canadian  colleague, 
Craig  Stirton,  a  former  schoolteach- 
er, agrees:  "I've  talked  with  execu- 


tives from  several  large  companies. 
They  are  seriously  worried  about 
the  kinds  of  skills  young  people 
have  when  they  leave  school.  The 
companies  have  been  forced  to  sup- 
plement their  new  employees'  for- 
mal schooling  with  creative- 
thinking  and  communication-skill 
seminars.  I  think  it's  time  children 
began  learning  these  skills  as  part 
of  their  basic  education." 

In  Tennessee,  General  Motors 
is  building  what  may  become  the 
largest  high-tech  industrial  com- 
plex in  the  world.  Known  as  the 
Saturn  Project  (after  the  Saturn, 
GM's  car  of  the  future),  it  will  give  a 
major  boost  to  the  Tennessee  econ- 
omy and  employ  thousands  of 
workers.  Tennessee  hopes  that  the 
Saturn  workforce  will  be  drawn 
from  people  already  living  in  Ten- 
nessee. But  according  to  William  D. 
Hoglund,  Saturn's  president,  appli- 
cants must  pass  a  rigid  test.  They 
must  be  competent  in  language  and 
math,  in  computer  and  other  high- 
tech  skills,  and  they  must  be  "risk 
takers"  and  demonstrate  "a  com- 
mitment to  creative  change  and 
growth,  and  lifelong  learning." 

Anticipating  GM's  and  other 
corporations'  new  human  resource 
needs,  Tennessee  Governor  Lamar 
Alexander  initiated  a  statewide  Bet- 
ter Schools  program  in  1984,  fund- 
ed by  a  one-cent  sales  tax.  Through 
this  program,  Alexander  and  the 
state  board  of  education  are  re- 
vamping the  curriculum  in  Tennes- 
see's schools.  Children  who 
graduate  from  high  school  in  com- 
ing years  will  have  a  solid  founda- 
tion in  ten  different  areas,  including 
the  basics  (reading,  writing,  arith- 
metic), computers,  and  other 
job-related  skills,  such  as 
accounting,  telecommunications, 
and  engineering. 

Dr.  James  Kelley  of  Tennes- 
see's Department  of  Education  is 
confident  that  public  schools  can 


provide  the  training  young  people 
need  to  meet  Saturn's  challenge. 
Stirton  and  Jaworski  agree.  "In 
Tennessee,"  Kelley  says,  "we  are 
putting  renewed  emphasis  on  high- 
level  thinking  skills  as  part  of  pre- 
sent subject  areas  like  math  and 
reading." 

Engrossed  In  Learning 

In  Michigan,  Stirton  and  Jaworski 
have  designed  a  learning  program, 
called  a  "transformational  environ- 
ment," that  would  focus  on  these 
high-level  skills  beginning  with  el- 
ementary school  pupils.  According 
to  Stirton,  "We  want  a  place  where 
children  would  be  so  engrossed  in 
their  activities  that  they  would  be- 
come oblivious  to  everything 
around  them." 

"This  kind  of  peak  experience 
is  common  to  hobbies,"  adds 
Jaworski,  "but  I  don't  see  why  it 
couldn't  happen  in  school."  It  could 
be  part  of  an  activity  center  in  a 
classroom  or  a  special  class  during 
the  day  or  after  school,  she  ex- 
plains. "The  energy  released  would 
be  tremendous.  Children  would 
feel  exhilarated  by  doing  something 
they  defined  as  a  goal  for  them- 
selves. Many  teachers  are  already 
doing  this.  We  should  aO  be  com- 
municating together,  and  we  need 
support  from  parents." 

To  get  in  touch  with  Stirton 
and  Jaworski,  write:  Craig  Stirton, 
6275  Atherly  Crescent,  Mississau- 
ga,  Ontario,  Canada  L5N  2J1  (his 
CompuServe  I,D,  is  72777,1054);  or 
Dr.  Anne  Porter  Jaworski,  School  of 
Human  and  Educational  Services, 
Oakland  University,  Rochester,  MI 
48063,  To  learn  more  about  Ten- 
nessee's Better  Schools  program, 
write  Dr.  James  Kelley,  Assistant 
Commissioner  for  General  Educa- 
tion, Tennessee  Department  of 
EducaHon,  Suite  200,  Cordel!  Hull 
Building,  Nashville,  TN  37219.    © 
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Computers  and  Society 


David  D,  Thornburg,  Associate  Editor 


Computer  Ethics 


Over  the  past  two  years  I've  been 
hearing  more  and  more  concern 

about  ethics  in  this  country — with 
special  emphasis  on  the  ethical  con- 
siderations associated  with  com- 
puter technology.  The  debate 
ranges  from  concern  about  the  dis- 
placement of  human  workers  by 
robots  to  the  issues  surrounding  the 
copying  of  commercial  software. 

To  take  just  one  example,  I  re- 
cently spoke  at  a  computing  confer- 
ence in  which  I  was  asked  what  my 
feelings  were  about  the  unautho- 
rized copying  and  distribution  of 
commercial  software.  In  this  partic- 
ular case,  the  questioner  was  a 
teacher  whose  budget  was  very 
tight.  My  response  was  simply  this: 
Unlike  murder,  which  is  only  a 
state  crime,  the  illicit  copying  of 
commercial  software  is  a  federal  of- 
fense. I  don't  think  much  of  mur- 
der, and  I  don't  think  much  of  those 
who  deprive  hard-working  soft- 
ware companies  of  their  just  re- 
wards for  their  efforts.  While  it 
might  be  interesting  to  study  why 
otherwise  law-abiding  people  are 
willing  to  even  consider  making 
copies  of  copyrighted  material,  that 
is  a  topic  for  another  column. 

Many  people  think  the  new 
technologies  of  the  information  age 
require  more  than  technical  skills 
on  the  part  of  their  users — they  re- 
quire some  thought  about  the  ethi- 
cal consequences  of  these  technol- 
ogies, both  from  a  personal  and 
from  a  societal  perspective.  Some- 
day we  might  see  the  following 
headlines  in  our  daily  papers: 

"Berserk  Robot  Kills  Six  at 
Auto  Plant" 

"Computer  Failure  at  Hospital 
Threatens  Safety  of  Hundreds" 

If  these  disasters  happened, 
the  affected  community  would  be 
outraged.  But  once  the  headlines 
died  down,  the  long,  drawn-out 
process  of  assessing  responsibility 
would  begin.  Who  was  at  fault? 


What  could  be  done  to  keep  this 
from  happening  again? 

The  Impact  Of  Technology 

As  we  develop  new  information 
and  automation  technologies  that 
our  children  will  use  as  freely  as  we 
use  paper  and  pencils,  we  should 
give  some  thought  to  preparing 
them  for  the  complexities  that 
arise — not  just  from  the  technology 
itself,  but  from  the  impact  this  tech- 
nology can  have  on  the  people  who 
make  it,  and  especially  on  those 
who  use  it. 

With  this  thought  in  mind,  I 
was  pleased  to  come  across  a  book 
entitled  Computer  Ethics  by  Thomas 
Kemnitz  and  Philip  Vincent  ($9.95 
from  Trillium  Press,  Box  921,  Madi- 
son Square  Station,  New  York,  NY 
10159).  It's  not  a  book  that  "teach- 
es" ethical  behavior;  instead,  it  ex- 
plores the  complexities  of  the  topic 
for  youngsters  in  grades  seven  and 
up. 

The  book  consists  of  numerous 
hypothetical  cases,  each  of  which 
raises  an  interesting  question  for 
which  the  answer  is  not  at  all  clear. 
Instead  of  presenting  a  point  of 
view,  the  book  presents  a  balanced 
view  of  both  sides  of  the  issue. 
Then  it  asks  questions  that  stimu- 
late readers  to  formulate  their  own 
opinions  on  the  case  and  to  present 
these  opinions  in  a  well-thought- 
out  manner.  Here's  an  example: 

In  this  day  and  age,  one 
often  hears  talk  of  "human 
rights."  People  talk  of  certain  in- 
dividual's rights  being  violated. 
Some  individuals  maintain  rights 
are  guaranteed  because  of  a  gov- 
ernment's "constitution."  Others 
maintain  that  all  human  beings 
are,  or  should  be  guaranteed,  cer- 
tain rights  simply  because  they 
are  human  beings.  A  common  er- 
ror is  committed  when  one 
speaks  of  rights  without  examin- 
ing the  philosophical  background 
that  constitutes  or  guarantees 
these   rights.    Should   rights   be 


guaranteed  to  people?  Animals? 
Machines?... 

If  cognitive  abilities  are  the 
criteria  for  granting  or  having 
rights,  then  humans  obviously 
have  rights. ..Should  computers 
have  rights?  Are  not  computers 
capable  of  reasoning,  analyzing 
and  processing  information?  Are 
computers  capable  of  enlighten- 
ing us  or  other  computers  if  they 
are  so  requested?  As  computer 
technology  grows,  many  feel 
computers  will  be  able  to  duph- 
cate  and  exceed  the  thinking  ca- 
pabilities now  dominated  by 
man... 

What  should  be  the  basis  for 
rights? 

If  The  Headlines  Happen 

The  activities  that  follow  this  case 
explore  the  issues  that  were  raised 
in  some  depth,  without  expressing 
a  particular  position.  For  example: 
How  do  you  distinguish  between 
rights  and  privileges? 

In  addition  to  raising  interest- 
ing questions  about  the  social  con- 
sequences of  technology.  Computer 
Ethics  stimulates  critical  thinking 
skills.  Given  the  complexity  of  the 
world  into  which  our  children  are 
growing,  this  skill  is  one  that 
should  be  nurtured  and  developed 
from  an  early  age. 

I  hope  we  never  see  the  kinds 
of  headlines  that  would  result  if 
some  of  the  hypothetical  cases  in 
Computer  Ethics  became  real.  But  if 
we  do,  I  hope  even  more  that  we  as 
a  society  will  be  prepared  to  engage 
in  the  kind  of  debate  that  can  not 
only  resolve  the  issue  at  hand,  but 
that  can  help  make  our  world  a 
safer  and  happier  place  in  which  to 
live. 

Dr.  Thornburg's  most  recent  product  is 
Calliope,  a  nonlinear  idea  processor  for 
the  Apple  lie,  lie,  and  Macintosh  comput- 
ers. He  welcomes  letters  from  readers  and 
can  be  reached  in  care  of  this  magazine.® 
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The  Beginners  Page 


Tom  rJ.  Holihili,  Editor 


String  Comparisons 


As  we've  pointed  out  more  than 
once  in  the  past  few  columns,  com- 
puters really  know  nothing  about 
our  written  language  of  alphabetic 
characters,  punctuation  marks,  and 
symbols — they  are  capable  of  deal- 
ing only  with  numbers.  Although 
this  means  computers  have  to 
spend  a  lot  of  time  translating 
things  for  our  convenience  (and 
vice  versa),  it  also  means  that  com- 
puters can  perform  "arithmetic"  on 
character  strings. 

This  concept  seems  a  little 
strange  at  first,  because  we're  used 
to  thinking  of  the  written  word  and 
mathematics  as  two  different,  in- 
compatible languages.  After  all,  a 
phrase  such  as  "The  quick  brown 
fox  jumped  over  the  lazy  dogs"  is 
just  as  meaningless  in  mathematics 
as  the  phrase  "X  =  (Y+2)*(Z/4)"  is 
in  English.  But  since  a  computer 
sees  "The  quick  brown  fox..."  as 
merely  a  string  of  numbers  (charac- 
ter codes),  we  can  write  programs 
that  perform  a  kind  of  arithmetic  on 
what  appears  to  us  as  strings  of 
characters.  Here's  an  example; 

IF  "A"<"B"  THEN  PRINT  'TT  WORKS!" 

When  you  press  RETURN,  the  re- 
sult is  the  message  IT  WORKS!. 

Notice  the  subtle  yet  vital  dif- 
ference between  this  line  and  the 
statement  IF  A<B  THEN  PRINT 
"IT  WORKS!".  Although  both 
statements  are  comparing  two  val- 
ues with  an  arithmetic  operator  (<, 
the  less-than  sign),  the  first  state- 
ment isn't  comparing  two  numeric 
values;  it's  comparing  two  character 
values. 

At  least,  that's  how  it  looks  on 
the  surface.  From  the  computer's 
point  of  view,  two  numbers — char- 
acter codes — are  still  being  com- 
pared. The  character  A  is  "less 
than"  the  character  B  because  the 
character  code  for  A  is  a  smaller 
number  than  the  character  code  for 
B.  You  can  confirm  this  by  typing 
PRINT   ASC("A")   and   PRINT 


ASC("B") — the  character  codes  are 
65  and  66,  respectively.  (See  the 
February  1986  "Beginner's  Page" 
for  more  details  on  ASCII  character 
codes.)  It's  easy  to  remember  that 
the  letter  A  is  less  than  the  letter  B, 
because  A  precedes  B  in  the  alpha- 
bet. But  keep  in  mind  that  it's  really 
the  character  codes,  not  the  alpha- 
betical positions,  that  count.  Consid- 
er this  example: 
IF  "A">"a"  THEN  PRINT  "IT  WORKS!" 


From  the  computer's 

point  of  view,  two 

numbers— character 

codes — are  being 

compared.  The 

character  A  is  "less 

than''  the  character  B 

because  the  character 

code  for  A  is  a  smaller 

number  than  the 

character  code  for  B. 


When  you  enter  this  statement, 
you  might  expect  to  see  the  mes- 
sage IT  WORKS!.  Alphabetically, 
the  uppercase  letter  A  should  take 
precedence  over  the  lowercase  let- 
ter a.  But  it  doesn't  work  that  way 
on  most  computers.  Instead,  the  IF- 
THEN  test  fails;  A  is  not  greater 
than  a.  Why?  Because  the  character 
codes  for  uppercase  letters  are 
numbered  from  65  to  90,  and  the 
codes  for  lowercase  letters  are  num- 
bered from  96  to  122.  (Yes,  it's 
odd.)  Therefore,  A  (65)  is  less  than  a 
(96).  The  statement  above  is  really 
the  equivalent  of  this: 

IF  ASC("A")>ASC("a")  THEN  PRINT 
"IT  WORKS!" 

which,  in  turn,  is  the  equivalent  of 

this: 


IF  65>%  THEN  PRINT  'IT  WORKS!" 

As  long  as  the  computer  can 
figure  out  that  65  isn't  greater  than 
96,  it  doesn't  have  to  know  any- 
thing about  alphabets. 

Incidentally,  you'll  get  differ- 
ent results  if  you  try  some  of  these 
examples  on  Commodore  comput- 
ers (except  the  Amiga).  Commo- 
dore machines  assign  character 
codes  a  bit  differently  than  other 
computers  do.  Normally,  the  Com- 
modore 64,  128,  and  VIC-20  don't 
display  upper/lowercase  charac- 
ters— you  have  to  press  the  SHIFT- 
Commodore  keys  to  switch  to  this 
mode.  This  renumbers  the  lower- 
case character  set  from  65  to  90  and 
the  uppercase  set  from  193  to  218. 
So  on  a  Commodore,  the  uppercase 
letters  are  indeed  "greater  than" 
the  lowercase  letters. 

Other  types  of  comparisons  are 
possible   with   strings,   too.    Try 
these: 
IF  "OK"  =  "OK"  THEN  PRINT  "OK" 

IF  'TMAGNOSTIC  TEST"<>"DIAG- 
NOSTIC  TEST"  THEN  PRINT 
"YOU'VE  GOT  A  HARDWARE 
PROBLEM" 

IF  'TiOG">"CAT"  THEN  PRINT  'TOLD 
YA  SO" 

All  of  the  examples  we've  seen 
so  far  compare  string  literals.  Of 
course,  you  can  also  compare  char- 
acters stored  in  string  variables: 

10  DIM  A$(5),BS(S):REM  This  line  for 

Atari  only 
20  A$  =  "<" 
30  B$  =  ">" 
40  IF  A$<B$  THEN  PRINT  "<  IS  LESS 

THAN  >" 

String  arithmetic  isn't  limited 
to  comparisons.  Next  month,  we'll 
see  how  you  can  add  two  strings 
together  in  various  versions  of 
BASIC,  and  cover  some  remaining 
string  functions  as  well.  @ 
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INSIGHT:  Atari 


Bill  Wilkinson 


Avoiding  Disk  Errors 


I  know  many  of  you  will  find  this 
hard  to  believe,  but  I've  never  en- 
countered a  disk  error  on  the  Atari 
which  I  couldn't  explain.  Further,  I 
have  had  very  few  DOS  errors, 
ever.  (The  reasons  for  the  few  er- 
rors I  have  encountered,  by  the 
way,  were  always  related  to  ran- 
dom access  files — a  common  prob- 
lem with  Atari  DOS  2.0  and  its 
derivatives.)  Yet  after  a  few  hun- 
dred phone  calls  and  letters,  I  know 
that  many  of  you  have  experienced 
the  frustration  of  wiped-out  disk 
files.  Why?  Well,  I  can't  know  each 
and  every  reason,  and  I  can't  repair 
damage  that's  already  been  done, 
but  maybe  I  can  give  you  some 
helpful  hints  for  the  future. 

Hands  Off  That  Disk 

Hint  1:  Never,  never,  never  take  a 
disk  out  of  a  drive  unless  the  pro- 
gram you're  using  tells  you  to.  (This 
goes  beyond  even  the  good  advice 
about  never  removing  a  disk  when 
the  drive  is  still  spinning.)  In  partic- 
ular, never  swap  disks  until 
prompted  to  do  so.  Why?  Well,  be- 
cause the  Atari  disk  drive  has  no 
way  to  tell  the  computer  that  the 
disk  has  been  removed  or  changed. 

Consider:  How  does  any  DOS 
know  what  disk  sectors  to  allocate 
to  a  new  file?  Generally,  a  DOS 
keeps  a  list  of  unused  disk  sectors. 
The  next  time  it  needs  to  find  a 
sector  (for  example,  to  extend  a 
file),  it  takes  one  from  this  list.  The 
list  (called  a  Volume  Table  Of  Con- 
tents or  VTOC  in  Atari  parlance)  is 
usually  kept  on  disk  until  a  file  is 
opened,  when  it  is  read  into  memo- 
ry. It  is  rewritten  to  the  disk  when  a 
file  is  closed. 

Okay,  now  open  a  file  for  out- 
put, write  some  information,  swap 
disks,  and  write  more  data.  What 
happens?  The  list  of  sectors  was 
correct  for  the  first  disk,  but  it's 
extremely  unlikely  that  it  bears  any 
reasonable  relation  to  what  exists 
on  the  second  disk.  Most  probably, 


DOS  will  allocate  several  sectors 
which  were  already  part  of  other 
files  on  the  second  disk.  Kablooey! 
If  you're  using  an  application 
program,  then,  follow  the  prompts 
and  don't  swap  disks  unless  told  to. 
If  you're  programming  and  work- 
ing with  disk  files,  make  sure  you 
close  all  open  files  before  swapping 
disks  (END  automatically  closes  all 
open  files  in  BASIC).  If  you're  using 
DOS,  you  should  be  safe  as  long  as 
you  change  disks  only  at  the  DOS 
prompt.  Of  course,  when  duplicat- 
ing files  or  disks,  you  must  swap 
disks  when  DOS  tells  you  to. 

Beware  Of  RESET 

Hint  2:  Never  hit  the  SYSTEM  RE- 
SET button  during  a  disk  operation. 
For  example,  if  you  hit  RESET  in 
the  middle  of  a  SAVE,  it's  possible 
to  end  up  with  a  completely  blown 
program.  In  fact,  if  you  then  SAVE 
the  program  to  disk  again,  you 
could  end  up  with  a  blown  disk  file. 

This  results  from  a  really  subtle 
bug  in  DOS  2.0.  When  DOS  enters 
what  is  known  as  burst  I/O  mode 
(to  speed  up  input/output),  it 
"copies"  the  memory  to  disk.  But 
DOS  2.0's  file  organization  requires 
that  the  last  three  bytes  of  each 
sector  contain  a  link  to  the  next 
sector  in  the  file.  How  can  it  do  this 
when  it  is  writing  directly  from 
memory?  Answer:  By  "swapping" 
three  bytes  of  memory  long  enough 
to  write  a  sector,  and  then  restoring 
the  bytes. 

Now  suppose  you  happen  to 
hit  RESET  when  those  three  bytes 
are  swapped  out.  Oops... say  good- 
bye to  your  program. 

There  are  two  ways  to  fix  this 
problem.  First,  since  DOS  gets  con- 
trol after  a  RESET,  it  could  check  to 
see  if  a  disk  write  was  interrupted. 
If  so,  it  could  restore  the  three 
bytes.  Or,  second,  DOS  could  al- 
ways copy  bytes  to  be  written  into  a 
buffer,  thus  never  disturbing  the 
program  (or  data)  in  memory.  The 


second  approach  is  successfully  used 
by  DOS  2.5. 

MEssing  Sectors 

Hint  3:  Avoid  hitting  RESET  during 
disk  operations  even  if  you're  using 
DOS  2.5,  because  you  may  still 
mess  up  the  disk  a  bit.  Here's  one 
way:  Open  a  file  for  write  (OPEN 
#5,8,0,"D:FILE"  in  BASIC,  for  ex- 
ample), write  some  data,  OPEN  an- 
other file  for  write,  write  data  to 
both  files,  CLOSE  the  first  file, 
write  some  more  data  to  the  second 
file,  and  then  hit  RESET.  What 
happens? 

The  VTOC  says  the  sectors  in 
the  second  file  which  were  written 
before  the  CLOSE  are  now  in  use 
(and  that  was  true  when  the 
CLOSE  took  place).  If  you  add  the 
number  of  free  sectors  remaining 
on  the  disk  to  the  number  of  sectors 
used  in  all  files,  the  total  is  no  long- 
er 707  in  single  density  or  1010  in 
enhanced  density,  as  it  should  be. 
You  just  lost  some  of  your  disk  space. 

Hint  4:  Everything  I  just  men- 
tioned about  RESET  also  applies  to 
turning  off  the  power.  For  example, 
if  you  have  a  power  failure  in  the 
middle  of  a  SAVE  from  BASIC  or 
while  there  are  some  data  files  open 
in  a  business  program,  be  prepared 
for  some  problems. 

Fortunately,  DOS  2.5  comes 
with  a  program  called  DISKFIX- 
,COM  which  does  a  pretty  good  job 
of  fixing  up  a  "damaged"  disk 
(either  DOS  2.0  or  2.5),  It  allows 
you  to  undelete  files  as  long  as  you 
haven't  written  any  new  files  since 
the  deletion.  At  your  choice  it  will 
either  try  to  recover  or  permanently 
remove  a  fUe  which  was  left  open 
for  output.  And,  most  importantly,  it 
checks  each  file  on  the  disk  to  make 
sure  it  is  OK,  and  then  reconstructs 
the  VTOC  to  ensure  that  all  707  or 
1010  sectors  are  accounted  for.     @ 
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Programming  the  Tl 


C.  Regeno 


Animation  In  Tl  BASIC 


The  theme  for  this  issue  of  COM- 
PUTE! is  graphics  and  animation,  so 
we'll  discuss  some  ways  you  can 
animate  in  Tl  BASIC.  Tl  Extended 
BASIC  adds  really  fun  animation 
with  the  sprite  features,  but  even  in 
regular  console  BASIC  you  can 
make  characters  move.  I'm  going  to 
suggest  four  ways  you  can  animate 
your  graphics. 

Perhaps  the  simplest  way  to 
move  something  on  the  screen  up- 
ward is  to  use  the  PRINT  statement. 
The  short  program  below  draws  a 
rocket  at  the  bottom  of  the  screen. 
Lines  140-160  print  blank  lines 
which  move  the  rocket  toward  the 
top  of  the  screen,  (You  may  also  use 
PRINT  with  colons.)  Of  course,  any 
other  graphics  you  might  have  on 
the  screen  also  move  upward  as 
you  print.  This  method  works  best 
with  larger  objects  that  need  to  be 
moved  upward  because  you  don't 
need  to  redraw  the  graphics. 

110  CALL  CLEAR 

120  CALL  CHAR<130, "10383838 

3a3a7C44" ) 

130  CALL  HCHAR(24, 15, 130) 

140  FOR  P=l  TO  21 

150  PRINT 

160  NEXT  P 

170  END 

The  next  short  program  illus- 
trates a  way  to  move  an  object 
across  the  screen  horizontally.  This 
method  involves  erasing  the  object 
and  then  redrawing  it — all  the  way 
across  the  screen.  Unlike  the  previ- 
ous method,  this  won't  affect  other 
graphics  on  the  screen.  Although  it 
works  with  several  characters,  ob- 
jects move  more  quickly  and  more 
smoothly  if  you  use  only  one 
character. 

The  program  redefines  charac- 
ter number  130  as  an  arrow.  In  a 
FOR-NEXT  loop  that  changes  the 
column  number,  first  a  space  (char- 
acter number  32)  is  placed  in  the 
previous  column  to  erase  the  exist- 
ing arrow,  then  the  new  arrow  is 
drawn  in  the  next  column.  This  re- 


peatedly erases  and  redraws  the  ar- 
row one  column  to  the  right.  Run 
the  program  to  see  how  fast  the 
arrow  moves  across  the  screen. 

110  CALL  CLEAR 

120  CALL  CHAR (130, "0S0C0eFF 

0E0C08") 

130  FOR  C=3  TO  28 

140  CALL  HCHflR(8,C-l,32) 

150  CALL  HCHAR<S,C, 130) 

li0  NEXT  C 

170  END 

This  method  is  probably  the 
most  common  way  to  move  a  char- 
acter. You  can  move  it  in  any  direc- 
tion by  erasing  the  character  in  the 
present  position,  then  changing  the 
row  and  column  and  redrawing  it  in 
another  position.  In  this  short  ex- 
ample, we've  erased  the  character 
with  a  blank  space.  But  if  the  char- 
acter is  moving  over  other  graphics, 
you  might  need  to  erase  it  with  the 
appropriate  graphics  characters  to 
restore  the  background.  Otherwise, 
the  moving  character  would  leave 
behind  a  trail  of  spaces.  This  meth- 
od of  animation  is  rather  jerky  if 
your  object  consists  of  several  char- 
acters that  need  to  be  moved,  but  it 
can  be  fairly  quick  with  just  one 
character. 

CALL  COLOR  Motion 

The  next  example  program  illus- 
trates a  different  way  to  move  an 
object  made  up  of  several  charac- 
ters. Rather  than  moving  one  char- 
acter at  a  time,  we'll  use  CALL 
COLOR  to  make  all  the  characters 
in  the  set  invisible  at  once,  then 
another  CALL  COLOR  to  make  the 
object  in  the  next  position  visible. 
This  sample  draws  an  eight- 
character  horse.  The  horse  is  actual- 
ly drawn  eight  times  on  the  screen 
using  eight  different  character  sets. 
Lines  130-200  define  strings  for 
eight  graphic  character  definitions. 
The  loop  in  lines  210-250  defines 
the  graphic  characters.  In  each  of 
the  sets  from  number  9  to  16,  the 
characters  are  defined  using  the 
strings  A$. 


Lines  260-380  are  another  loop. 
Line  270  makes  the  characters  in- 
visible. Lines  280-290  determine  a 
character  number  and  a  row  num- 
ber depending  on  the  set  number. 
Lines  300-370  draw  the  horse.  This 
loop  draws  eight  horses  on  the 
screen  vertically,  but  they  are  all 
invisible. 

Lines  390-470  are  the  loops 
that  create  the  movement.  The 
CALL  COLOR  statement  with  a  14 
defines  the  horse  as  color  14  for  a 
particular  color  set.  The  horse 
moves  up  and  down  as  the  color  set 
number  varies  and  one  set  is  made 
invisible  and  the  next  set  made  visi- 
ble. All  you  need  to  do  is  add  the 
rest  of  the  carousel  and  the  music! 

This  example  has  only  one 
horse  moving  up  and  down.  You 
could  draw  more  horses  on  the 
screen — for  example,  with  the  set 
number  9  horse  at  the  bottom  of  the 
screen  and  the  set  16  horse  at  the 
top.  No  matter  how  many  horses 
are  on  the  screen,  the  CALL 
COLOR  statement  changes  all  the 
horses  in  a  particular  set.  You  can 
have  several  objects  moving  at  the 
same  time  by  using  the  CALL 
COLOR  loops  in  lines  390-470. 

110     CALL     CLEAR 

120    CALL    SCREENdi) 

130    A»<1)="2E3F3F7F7FFFE7E7 

ill 

140  fl»  (2) ="008080C0C0E0E0E" 
130  A»(3)="07070707071F7FFF 


160 
170 


A» (4) ""FlFFFFFFFFFFFFa" 
A* (5) -"FFFDFCFCFCFCFSFa 


180  A« (6) ="C0C0E0E0E0602" 

1V0  A« (7)="C060301A0E" 

200  A» (8)="F8783Cia30606" 

210  FOR  C=9  TO  16 

220  FOR  J=l  TO  8 

230  CALL  CHAR (C*a+23+J, A» ( J 

)  ) 
240  NEXT  J 
250  NEXT  C 
260  FOR  C=9  TO  16 
270  CALL  C0LDR(C,1,J) 
280  CH-C«B+23 
290  Raw= tC-a) >3-l 
300  CALL  HCHAR(RDW-1 , I4,CH+ 

1  ) 


102     COMPUTEI     Way  19S6 


310 

CALL 

HCHAR(R0W-1, 15,CH+ 

2.1 

320 

CALL 

HCHARCRDW, 14,CH+3) 

330 

CALL 

HCHARCRDW, 15,CH+4) 

340 

CALL 

HCHAR(RDW, 16,CH+5) 

350 

CALL 

HCHARCROW, 17,CH+6) 

360 

CALL 
7) 

HCHARCROW+1 , 14,CH+ 

370 

CALL 
8) 

HCHAR(R0W+1 , 16,CH+ 

360 

NEXT 

C 

390 

FOR  C=9  TO  16 

400 

CALL 

COLaR<C-l, 1,1) 

410 

CALL 

COLOR (C, 14,1) 

420 

NEXT 

C 

430 

FOR  C=16  TO  9  STEP  -1 

440 

CALL 

COLOR (C, 1,1) 

450 

CALL 

COLOR(C-1, 14, 1) 

460 

NEXT 

C 

470 

BOTO 

390 

480 

END 

CALL  CHAR  Animation 

The  last  method  of  animation  I'm 
going  to  discuss  this  month  is  using 
CALL  CHAR.  Just  as  CALL  COLOR 
instantly  changes  the  color  of  all 
characters  on  the  screen  in  that 
color  set,  CALL  CHAR  redefines  a 
graphic  character  definition  of  all 
characters  of  that  number  on  the 
screen.  For  example,  if  you  have 
something  on  the  screen  and  exe- 
cute CALL  CHAR(32,"FF"),  all  of 
the  characters  with  number  32  (all 
the  spaces)  instantly  change  to  the 
new  character  definition,  in  this 
case  a  horizontal  line. 

The  following  program  illus- 
trates this  technique.  Lines  110-180 
clear  the  screen  and  draw  a  simple 
face  using  keyboard  symbols.  You 
can  draw  a  much  fancier  face,  but 
this  is  just  a  sample.  To  type  the 
eyes,  use  the  function  key  along 
with  the  C  key  to  get  the  ^  mark. 
This  is  character  96.  Line  190  rede- 
fines character  96  for  an  open  eye. 
Lines  200-210  create  a  delay  loop 
while  the  eye  is  open,  then  line  220 
redefines  character  96  as  a  closed 
eye.  Lines  230-240  create  another 
delay  loop.  Line  250  branches  back 
to  line  190  to  open  the  eye. 

110  CALL  CLEAR 

120  PRINT  TAB  (6)  ;  "S)S353333)3 

3" 
130  PRINT  TAB {6) ; "3 

3" 
140  PRINT  TAB(6) ; " S 

3" 
130  PRINT  TAB (6) ; " i 

I  " 
160  PRINT  TAB (6) ; " I 

I  " 
170  PRINT  TAB(6) ; "\ 

/" 
180  PRINT  TAB(7);"\ /" 


190  CALL  CHAR (96, " ia247A7A7 

A7EB1 ") 
200  FOR  DELAY=1  TO  500 


210  NEXT  DELAY 

220  CALL  CHAR (96, "00000000B 

37D254B") 

230  FOR  DELAY=1  TO  100 

240  NEXT  DELAY 

230  QOTO  190 

260  END 

Latest  Tl  News 

Now  a  few  comments  on  the  TI- 
99/4 A  world.  I  enjoyed  a  recent 
visit  to  Las  Vegas  to  the  Southern 
Nevada  Users  Group  (SNUG,  P.O. 
Box  26301)  and  also  met  several 
people  from  the  Los  Angeles  and 
San  Diego  areas.  Terri  Masters, 
president  of  the  L.A.  99er  Com- 
puter Group  (P.O.  Box  3547,  Gar- 
dena,  CA  90247),  was  busy 
preparing  for  their  Fes  t- West  expo 
to  be  held  March  1-2.  It  will  be  over 
by  the  time  you  read  this,  but  you 
can  plan  on  attending  next  year. 
Chicago  holds  an  annual  fest  in 
October,  and  other  groups  have  ex- 
pos as  well,  so  you  can  see  the  TI- 
99/4A  is  not  dead. 

I  also  met  Craig  Miller  of 
Millers  Graphics  (1475  W.  Cypress 
Avenue,  San  Dimas,  CA  91773), 
who  demonstrated  his  GRAM 
Kracker,  which  will  open  up  all 
sorts  of  possibilities  for  TI  owners. 
This  device  can  save  a  module  (car- 
tridge) program  onto  a  disk  or  cas- 
sette. It  also  allows  you  to  change  or 
customize  a  module  program — for 
example,  change  the  title  screen  or 
default  colors.  Miller  was  also  dis- 
tributing his  new  book.  The  Orphan 
Chronicles,  by  Ron  Albright.  This 
book  tells  the  history  of  the  TI  and 
includes  a  current  list  of  TI  dealers, 
manufacturers,  and  user  groups, 

Les  Merryman  (Lancaster,  Cal- 
ifornia), a  distributor  for  Myarc, 
was  also  at  the  SNUG  meeting  and 
showed  several  new  Myarc  prod- 
ucts, including  disk  controllers,  a 
hard  disk  drive,  and  their  new  Ex- 
tended BASIC  module. 

Please  don't  write  to  me  about 
hardware  products — write  directly 
to  the  manufacturers  and  distribu- 
tors. There  are  still  companies  mak- 
ing peripherals  for  the  TI,  and  there 
are  people  who  have  as  many  as 
four  disk  drives  hooked  up  to  their 
machines.  Even  though  Texas  In- 
struments quit  selling  the  TI-99/4A 
more  than  two  and  a  half  years  ago, 
user  groups  are  still  going  strong, 
and  it's  amazing  what  people  are 
doing  vnth  their  TIs.  © 
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The  PC/VCR  Connection 


Remember  those  8  mm  home  mov- 
ies you  took  back  in  the  1960s  and 
70s. ..the  ones  stored  away  in  a 
shoebox  on  the  top  shelf  of  a  clo- 
set...the  ones  you  haven't  seen  in 
years  because  it's  too  much  trouble 
to  set  up  the  projector  and  screen? 
Now,  if  you  have  a  videocassette 
recorder  (VCR),  you  can  show  them 
on  your  TV  set. 

The  first  step  is  to  transfer  the 
film  to  tape.  There  are  commercial 
firms  in  most  major  cities  that  spe- 
cialize in  this  service.  Ask  your  vid- 
eo dealer  to  recommend  one  or  call 
the  tape  editor  at  your  local  TV 
station  for  suggestions.  The  cost  is 
quite  reasonable — usually  just  $2 
to  $3  for  50  feet  of  film,  plus  about 
$6  for  the  cost  of  a  two-hour  tape. 
Most  firms  give  substantial  price 
breaks  for  200-  and  400-foot  reels. 

The  picture  quality  of  the  tape 
can  actually  exceed  that  of  the  origi- 
nal film  if  the  transfer  is  properly 
done.  This  means  you  should  avoid 
firms  that  transfer  the  film  to  tape 
by  projecting  your  movies  on  a 
screen  and  recording  the  image 
with  a  video  camera.  Because  film 
and  video  have  different  speeds  (18 
frames  per  second  versus  30  fps), 
taping  from  a  movie  screen  can  re- 
sult in  horizontal  interference  lines 
and  flickering.  Professional  transfer 
firms  have  special  equipment  to 
overcome  this  problem. 

Once  the  film  is  copied  on 
tape,  you  can  add  music  and  narra- 
tion if  your  VCR  has  dubbing  fea- 
tures. If  not,  consider  renting  a  VCR 
with  those  features  and,  while  you 
have  the  second  machine  available, 
make  copies  of  the  tape  for  friends 
or  relatives.  As  your  tapes  begin  to 
take  on  a  professional-looking 
quality,  you'll  want  to  add  titles, 
too.  Here's  where  your  IBM  PC  or 
PCjr  really  shines. 

Simple  Patchwork 

All  you  need  to  make  titles  with 
your  computer  is  a  cable  to  connect 


the  composite  video  output  to  the 
VCR.  You'll  need  a  shielded  cable 
with  a  male  RCA-type  plug  on  both 
ends.  (Electronics  stores  such  as  Ra- 
dio Shack  have  them  in  different 
lengths  for  about  $5.  Or  you  can 
borrow  one  from  a  stereo  system.) 
Plug  one  end  of  the  cable  into  the 
video  input  jack  on  the  back  of  the 
VCR.  If  your  VCR  is  an  older  model 
with  nothing  but  an  antenna  con- 
nection, you  should  rent  or  borrow 
a  newer  machine  for  best  results. 
The  other  end  of  the  cable  plugs 
into  the  jack  labeled  V  on  the  back 
of  the  PCjr,  or  into  the  jack  on  the 
PC's  color/graphics  adapter  board. 
(If  your  PC  only  has  the  mono- 
chrome adapter,  you  lack  the  neces- 
sary hardware.) 

Once  the  connection  is  made, 
you  can  record  virtually  anything 
that  appears  on  your  computer 
screen,  although  some  color  combi- 
nations that  look  good  on  an  RGB 
monitor  don't  record  well. 

If  your  computer's  display  is  a 
composite  monitor,  you'll  have  to 
disconnect  it  to  plug  the  patch  cable 
into  the  composite  video  output. 
That  means  you'll  need  to  figure 
out  some  method  for  previewing 
the  titles — the  computer  output. 
The  easiest  way  is  to  connect  a  TV 
set  to  the  VCR  as  usual.  Then, 
whatever  your  computer  is  "play- 
ing" will  be  displayed  on  the  TV 
and  can  be  recorded  by  the  VCR — 
just  as  though  the  PC  were  a  TV 
station  or  cable  system.  Alterna- 
tively, you  can  view  the  computer 
output  on  an  RGB  monitor  or  TV 
connected  directly  to  the  PC  or 
PCjr. 

Creating  Your  Own  Tities 

The  next  step  is  to  produce  the  ti- 
tles. Things  like:  Christmas  1975, 
Eric's  4th  Birthday,  Vacation  in 
Hawaii.  You  can  use  any  program 
that  produces  text  on  the  computer 
screen,  preferably  in  a  large  size 
and  in  color.  You'll  want  something 


that  doesn't  leave  a  menu  line  or 
blinking  cursor  on  the  screen. 

For  really  professional  results 
(at  a  professional  price — $250),  it's 
difficult  to  beat  IBM's  PC  Story 
Board  software.  This  program  is  de- 
signed for  making  animated  graph- 
ics presentations.  Besides  having 
different  sizes  and  styles  of  type — 
shadowed,  outlined,  and  slanted  in 
either  direction — Story  Board  allows 
you  to  dissolve,  wipe,  explode, 
push,  and  weave  from  one  screen  to 
another.  A  whole  series  of  titles  can 
be  stored  on  disk  and  played  back 
automatically  in  a  timed  sequence. 

Story  Board  is  designed  for  cor- 
porate presentations,  and  although 
the  results  are  soectacular,  most  of 
us  can't  justify  spending  $250  to 
title  home  videos.  Fortunately, 
there's  an  economical  alternative. 

You  can  produce  colorful,  at- 
tractive titles  with  a  very  simple 
BASIC  program — even  if  you're 
not  a  programmer.  The  program 
below  produces  three-line  titles  in 
colors;  consult  the  COLOR  state- 
ment (for  text)  in  your  BASIC  man- 
ual to  equate  a  color  with  a  number 
(e.g.,  l=blue,  2= green,  etc.).  Back- 
ground colors  must  be  in  the  range 
of  0  through  7;  foreground  (text) 
must  be  in  the  range  of  0  through 
15.  Insert  spaces  ahead  of  the  text  to 
center  the  lines  on  the  screen. 

The  INKEY$  statement  in  line 
200  keeps  the  OK  prompt  off  the 
bottom  of  the  screen.  On  the  PCjr, 
you  can  generate  even  larger  char- 
acters by  changing  the  number  40 
in  line  100  to  20.  This  displays  20 
characters  per  line  instead  of  40. 

IBM  PC/PC]r  Video  Titler 

For  instructions  on  entering  this  listing,  please 
refer  to  "COMPUTEI's  Guide  to  Typing  in 
Programs"  in  fhis  issue  of  computei, 

EK  10  REM  The  3  title  lines  fall 

CM 

JA  20   LINE1*="  CHRIS 

TMftS" 

BE  30   LINE2*="  19 

80" 
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LS  40  LirJE3«="  at  Era 

ndma' s" 
LD  50  REM  The  colors  -for  each  of 
the  three  lines  -follow 

s  is  re 


'Thi 


HS  60  C0LR1=4 

d  far  line  1 
OH  70  C0LRZ=7         'This  is  wh 

its  for  line  2 
in  80  CDLR3=1         'This  is  bl 

ue  for  line  3 
K   90  BftCKBRQUND=0    'This  is  bl 

ack.  Change  0  to  1  far  blu 

e,  etc. 
CI  100  WIDTH  40:CLS:KEY  DFF:LDCA 

TE  1,1,0 
IC  110  PRINT 

EH  120  COLOR  CDLRl,  BACKGROUND 
F6  130  PRINT  LINE1« 
BE  140  PRINT:PRINT:PRINT 
6N  150  COLOR  C0LR2 
66  160  PRINT  L1NE2* 
CS  170  PRINT:PRINT:PRINT 
HC  180  COLOR  CaLR3 
IL  190  PRINT  LINE3« 
KO  200  A*=INKEY*;IF  A*=""  THEN  2 

00 
68  210  WIDTH  80:COLOR  7,0      ^ 
LP  220  END  ® 
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IVILX  Mixup 

If  you've  tried  to  enter  the  "Screen 
Genie"  program  from  the  April  is- 
sue, you  may  have  discovered  that 
the  version  of  "MLX"  published  in 
that  issue  (p.  123)  cannot  be  used. 
The  MLX  program  in  the  April  issue 
is  an  accidental  resurrection  of  the 
old  version,  which  has  not  been 
used  since  November  1985.  Screen 
Genie  must  be  entered  vnth  the 
new  version  of  MLX,  which  ap- 
peared in  the  December,  January, 
and  February  issues. 

Switchbox 

The  Atari  version  (Program  3)  of 
this  game  from  the  March  issue  (p. 
34)  has  two  typos.  In  line  130,  the 
AR$(1.3)  should  be  AR$(1,3).  The 
proper  Proofreader  checksum  for 
the  corrected  line  is  NH.  More  sig- 
nificantly, in  line  460  the  character 
shown  as  (  =  }  should  actually  be 
SHIFT- =,  the  vertical  line  character. 
In  the  Apple  version  (Program 
4),  the  following  line  should  be 
added  to  ensure  that  no  extraneous 
characters  appear  on  the  game 
screen: 

2!  1035  FOR  I  =  36096  TO  36103; 
POKE  1,0:  NEXT 

In  the  Atari  ST  version  (Pro- 
gram 7),  a  set  of  quotation  marks  is 
missing  in  line  20.  The  first  variable 
definition  in  the  line  should  be: 
sp$(0)="\  \_":. 

Commodore 
Program  Profiier 

In  this  utility  program  from  the 
February  1986  issue,  two  of  the 
DATA  lines  contain  spurious  ques- 
tion marks  and  are  missing  charac- 
ters. Lines  170  and  370  should  read 
as  follows: 

170  DATA  160,192,32,30,171,32, 

207,255,201,13  :rein  99 

370  DATA  126,192,141,127,192,1 

65,157,208,106,169  ;rem  75 


IBM  PrfSc  Protector  & 
Screen  Clocic 

These  two  programs — "PrtSc  Pro- 
tector" from  the  February  issue  (p. 
81)  and  "Screen  Clock"  from  the 
April  issue  (p.  107) — both  have  the 
same  problem.  Due  to  a  quirk  in  the 
program  we  use  to  generate  list- 
ings, the  "Automatic  Proofreader" 
checksums  for  the  DATA  lines  are 
incorrect.  That  is,  the  programs  are 
correct  as  published,  but,  if  you  at- 
tempt to  type  them  in  using  our 
Automatic  Proofreader  utility,  the 
checksums  you'll  get  for  the  DATA 
lines  will  be  different  from  those 
shown  in  the  magazine.  As  a  result, 
we  recommend  that  these  programs 
be  entered  directly,  without  using 
the  Proofreader. 

ST  Doodler 

A  bracket  character  is  missing  in 
this  Logo  graphics  program  for  the 
Atari  ST  in  the  February  1986  issue 
(p.  78).  In  the  procedure  BCORF  at 
the  bottom  of  the  middle  column, 
there  should  be  a  left  bracket,  [, 
before  SETPOS.  © 


Attention  Programmers 

COMPUTE!  magazine  is  currently 
looking  for  quaiity  articles  on 
Commodore,  Atari,  Apple, 
and  IBM  computers  (including 
the  Commodore  Amiga  and 
Atari  ST),  If  you  have  an 
interesting  home  application, 
educational  program, 
programming  utility,  or  game, 
submit  It  to  COMPUTE!,  P.O. 
Box  5406,  Greensboro,  NC 
27403.  Or  write  for  a  copy  of 
our  "Writer's  Guidelines." 


May  1986     COMPUTEI      105 


COMPUTE'S 

Author  Guide 


Most  of  the  following  suggestions  serve  to  improve 
the  speed  and  accuracy  of  publication.  COMPUTE!  is 
primarily  interested  in  new  and  timely  articles  on  the 
Commodore  64/128,  Atari,  Apple,  IBM  PC/PCjr, 
Amiga,  and  Atari  ST.  We  are  much  more  concerned 
with  the  content  of  an  article  than  with  its  style,  but 
articles  should  be  clear  and  well-explained. 

The  guidelines  below  will  permit  your  good  ideas 
and  programs  to  be  more  easily  edited  and  published: 

1.  The  upper  left  corner  of  the  first  page  should 
contain  your  name,  address,  telephone  number,  and 
the  date  of  submission. 

2.  The  following  information  should  appear  in  the 
upper  right  corner  of  the  first  page.  If  your  article  is 
specifically  directed  to  one  make  of  computer,  please 
state  the  brand  name  and,  if  applicable,  the  BASIC  or 
ROM  or  DOS  version(s)  involved.  In  addition,  please 
indicate  the  memory  requirements  of  programs. 

3.  The  underlined  title  of  the  article  should  start 
about  2/3  of  the  way  down  the  first  page. 

4.  Following  pages  should  be  typed  normally,  ex- 
cept that  in  the  upper  right  comer  there  should  be  an 
abbreviation  of  the  title,  your  last  name,  and  the  page 
number.  For  example:  Memory  Map/Smith/2. 

5.  All  lines  within  the  text  of  the  article  must  be 
double-  or  triple-spaced.  A  one-inch  margin  should  be 
left  at  the  right,  left,  top,  and  bottom  of  each  page.  No 
words  should  be  divided  at  the  ends  of  lines.  And 
please  do  not  justify.  Leave  the  lines  ragged, 

6.  Standard  typing  paper  should  be  used  (no  eras- 
able, onionskin,  or  other  thin  paper)  and  typing 
should  be  on  one  side  of  the  paper  only  (upper-  and 
lowercase). 

7.  Sheets  should  be  attached  together  with  a  pa- 
per clip.  Staples  should  not  be  used. 

8.  If  you  are  submitting  more  than  one  article, 
send  each  one  in  a  separate  mailer  with  its  own  tape 
or  disk. 

9.  Short  programs  (under  20  lines)  can  easily  be 
included  within  the  text.  Longer  programs  should  be 
separate  listings.  It  is  essential  that  we  have  a  copy  of 
the  program,  recorded  twice,  on  a  tape  or  disk.  If  your 
article  was  written  with  a  word  processor,  we  also  ap- 
preciate a  copy  of  the  text  file  on  the  tape  or  disk. 
Please  use  high-quality  10  or  30  minute  tapes  with 
the  program  recorded  on  both  sides.  The  tape  or  disk 
should  be  labeled  with  the  author's  name,  the  title  of 
the  article,  and,  if  applicable,  the  BASIC/ROM/DOS 
version(s).  Atari  tapes  should  specify  whether  they  are 
to  be  LOADed  or  ENTERed.  We  prefer  to  receive  Ap- 
ple programs  on  disk  rather  than  tape.  Tapes  are  fairly 
sturdy,  but  disks  need  to  be  enclosed  within  plastic  or 
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cardboard  mailers  (available  at  photography,  station- 
ery, or  computer  supply  stores). 

10.  A  good  general  rule  is  to  spell  out  the  num- 
bers zero  through  ten  in  your  article  and  write  higher 
numbers  as  numerals  (1024).  The  exceptions  to  this 
are:  Figure  5,  Table  3,  TAB(4),  etc.  Within  ordinary 
text,  however,  the  zero  through  ten  should  appear  as 
words,  not  numbers.  Also,  symbols  and  abbreviations 
should  not  be  used  within  text:  use  "and"  (not  &), 
"reference"  (not  ref.),  "through"  (not  thru). 

11.  For  greater  clarity,  use  all  capitals  when  refer- 
ring to  keys  (RETURN,  TAB,  ESC,  SHIFT),  BASIC 
words  (LIST,  RND,  GOTO),  and  three  languages 
(BASIC,  APL,  PILOT).  Headlines  and  subheads 
should,  however,  be  initial  caps  only,  and  emphasized 
words  are  not  capitalized.  If  you  wish  to  emphasize, 
underline  the  word  and  it  will  be  italicized  during 
typesetting. 

12.  Articles  can  be  of  any  length — from  a  single- 
line  routine  to  a  multi-issue  series.  The  ayerage  article 
is  about  four  to  eight  double-spaced,  typed  pages. 

13.  If  you  want  to  include  photographs,  they 
should  be  either  5X7  black  and  white  glossies  or 
color  slides. 

14.  We  do  not  consider  articles  which  are  submit- 
ted simultaneously  to  other  publishers.  If  you  wish  to 
send  an  article  to  another  magazine  for  consideration, 
please  do  not  submit  it  to  us. 

15.  COMPUTEI  pays  between  $70  and  $800  for 
published  articles.  In  general,  the  rate  reflects  the 
length  and  quality  of  the  article.  Payment  is  made 
upon  acceptance.  Following  submission  (Editorial  De- 
partment, COMPUTE!  Magazine,  P.O.  Box  5406, 
Greensboro,  NC  27403)  it  will  take  from  four  to  eight 
weeks  for  us  to  reply.  If  your  work  is  accepted,  you 
will  be  notified  by  a  letter  which  will  include  a  con- 
tract for  you  to  sign  and  return.  Rejected  manuscripts 
are  returned  to  authors  who  enclose  a  self-addressed, 
stamped  envelope. 

16.  If  your  article  is  accepted  and  you  have  since 
made  improvements  to  the  program,  please  submit  an 
entirely  new  tape  or  disk  and  a  new  copy  of  the  arti- 
cle reflecting  the  update.  We  cannot  easily  make  revi- 
sions to  programs  and  articles.  It  is  necessary  that  you 
send  the  revised  version  as  if  it  were  a  new  submis- 
sion entirely,  but  be  sure  to  indicate  that  your  submis- 
sion is  a  revised  version  by  writing,  "Revision"  on  the 
envelope  and  the  article. 

17.  COMPUTE!  does  not  accept  unsolicited  product 
reviews.  If  you  are  interested  in  serving  on  our  pane! 
of  reviewers,  contact  the  Review  Coordinator  for 
details. 


Classified 


SOFTWARE 


TI-99/4A  Software/Hardware  bargains. 
Hard  to  find  items.  Huge  selection. 
Fast  Service.  Free  Catalog. 
D.E.C.,  Box  690,  Hicksville,  NY  11801 

LOTTO  PICKER.  Improve  your  chances  for  those 
Million  Dollar  Jackpots!  Picks  LOTTO,  WIN-4, 
and  Daily  Numbers,  All  USA  &  CAN.  games  ind. 
Expandable!  IBM/C64/TE99  $29.95.  Order  Now! 
1-800-341-1950  Ext.  77.  Mail  Orders:  Ridge,  170 
Broadway,  #201C,  NYC,  NY  10038.  Catalog. 

PROJECT  PLANNING/MANAGEMENT  using 
the  C64,  SX,  or  CI 28.  Data  sheet  for  SASE 
Program  for  J106.95  (CA  res.  add  6%  s.t.) 
LAWCO,  Dcpt.  CL,  Box  2009,  Manteca,  CA  95336 

FREE  SOFTWARE  CATALOGI 
Call  Toll-Free  1-800-554-1162,  Tevex,  Inc. 
Save  Vi  oH  retail  prices.  We  cany  SSI, 
Elect  Arts,  Infocom,  and  many  morel 

COMMODORE:  TRY  BEFORE  YOU  BUY.  Top  25 
best-selling  games,  utilities,  new  releases.  Visa, 
MasterCard.  Free  brochure,  Rent-A-Disk,  908  9th 
Ave.,  Huntington,  WV  25701  (304)  522-1665 

DISCOUNT  SOFTWARE:  Amiga/ Apple/ 
Atari/C64-128/1BM  PC-PCjr/TRS-80/Timex/ 
Sinclair.  Free  Catalog:  WMJ  DATA  SYSTEMS, 
4  Butterfly  Dr.,  Hauppauge,  NY  11788 

FREE  SOFTW.ARE  for  C64,  C128,  IBM  &  CPM. 
For  info  send  large  stamped  (39i!)  return 
envelope  to:  PUBLIC  DOMAIN*  USERS  GROUP, 
PC  Box  1442-AI,  Orange  Park,  FL  32067 

TI-99/4A  QUALITY  SOFTWARE  for  Business, 
Home  and  Entertainment  "BONUS  SOFTWARE 
OFFER!**  Send  for  FREE  catalog  to  MICRO-BIZ 
HAWAII  BOX  n03.  Pearl  City,  HI  96782 

ATTENTION  TI99/4A  OWNERS  III 
See  our  ad  In  Product  Mart 
The  99/4A  National  Assistance  Group 
(305)  583-0467 

BETTER  GRADES!  Isn't  that  what  you  want 
from  educational  software?  SPELLBOUND  is 
a  new  program  from  ROBINSOFT  that  REALLY 
TEACHES  spelling!  And  it's  affordable  loo. 
Works  with  any  spelling  list  (try  foreign 
languages  tool),  uses  recognized  educational 
techniques  and  incorporates  an  adjustable 
difficulty  level.  Available  on  diskette 
for  Apple  IL  C54,  TRS-80  111/4,  T199/4A, 
Kaypro  (CP/M).  Send  $14.95  or  write  to 
Robinsoft-C2,  Box  666,  Prineville, 
Oregon  97754 

Games:  IBM -PC/COMMODORE  64  Stocks, 
Black  Jack  and  Roulette;  all  3  for  S25  on  disk. 
Horserace  Handicapper  -  produces  profits!  $85 
for  disk.  Wolf-Bytes,  7833B  N.  60th  St., 
Milwaukee,  Wl  53223.  Info:  (414)  357-6410 

TANDY  1000  PROGRAMS  AND  NEWSLETTER 
Send  lor  free  information  on  educational 
&  entertainment  programs  &  newsletter. 
Soda  Pop  Software,  POB  653,  Kenosha,  Wl  53141 

ATARI  WARE:  THE  BEST  PD  SOFTWARE  FROM 
ATARI  enthusiasts  across  the  U.S.!  80  disks  to 
choose  from  -  S5  ea.  Catalog  with  SASE. 
KD-ACE,  P.O.  Box  1646,  Orange  Park,  FL  32067 


DR.  T's  MUSIC  SOFTWARE 
A  music  composition  system  with  true 
word  processing  capabilities  for  APPLE  and 
COMMODORE  computers.  Also  algorithmic 
composition  programs  for  computer 
generation  of  sequences.  Fully  editable 
Bach,  Keyboard,  Bass  and  Drum  disks. 
Patch  librarians  available  for  Yamaha  and 
Casio  synthesizers.  Reviewed  in  Jan.  '85 
COMPUTE!  (617)  244-6954,  Dr.  T's,  Dept.  C, 
66  LOUISE  RD.,  CHESTNUT  HILL,  MA  01267 

1  MISCELLANEOUS                                  | 

Discount  computer  printer  ribbons  for  all 
makes/models  Ex;  Epson  1500  Nylon  $6.99. 
Catalog;  TWS  1314  4th  Ave.,  Coraopolis,  PA 
15108  (412)  262-1482  Visa  or  MasterCard. 

IBM  PCjr  REPORT:  THE  NATIONAL  NEWS- 
LETTER. PCjr-specific  articles,  reviews.  Public 
Domain  from  across  the  nadon.  $18./yr. 
PCjr  CLUB,  POB  95067,  Schaumberg,  IL  60195 

RIBBONS  for  MOST  PRINTERS  at  LOW  PRICES! 

LINEAR  PROGRAMMING  IBM  200X200  VAR/ 
COST  -1-  LESSONS  $25,  SAMPLE  DSK  SIO, 
TURBO  PASCAL  SOURCE  $20,  ATARI  VERSION 
30X30  $12,  ATWRIT  ERPRINTDRiVER  $12, 
ASM  LANG  CONVERTER  $12.  ALCHEMY 
SYSTEM,  PO  BOX  694,  PAOLI,  PA  19301 

DELTA  MICRONIC5 

BOX  10933,  ERIE,  PA  16514-0933 

(814) 455-5667 

INCORPORATE  Without  Legal  Fees! 
Free  Booklet  Tells  How,  Includes  Forms. 
Call  HARVARD  BUSINESS  SERVICES  NOW: 

WOODWORKERS!  Program  makes  bidding 
custom  work  easy!  C-64,  Apple,  IBM.  $29.95. 
Visa,  MC,  check  to:  BID!,  Box  218,  Brookston,  IN 
47923,  Info  call  (317)  563-3504 

800-345-CORP 

If  you'd  like  information  on  the  latest 
version  of  your  software,  please  call  or 
write;  Batteries  Included  Customer  Support,  30 
Mural  St.,  Richmond  Hill,  Ontario, 
Canada  L4B  1B5  (416)  881-9816 

ESCAPE  FROM  "DER  BUNKER"  T1-99/4A 
An  interactive  Adventure  on  Cassette  in  16K 
Extended  Basic.  Survive  Hitler's  Last  Refuge. 
THEY  KNOW  WHO  YOU  ARE!  "Use  the  Potato 
Masher  wisely."  $10  to;  APEX  Software, 
PO  Box  90475,  Honolulu,  HI  96835 

COMPUTE!  Cfassified  is  a  low-cost  way  to  tell  over  350,000 
microcomputer  owners  about  your  product  or  service. 

Rates:  $25  per  line,  minimum  of  four  lines.  Any  or  all  of  the  first  line  set  in  capital 
letters  at  no  charge.  Add  $15  per  line  for  boldface  words,  or  $50  for  the  entire  ad  set 
in  boldface  (any  number  of  lines.) 

Terms:  Prepayment  is  required.  Check,  money  order,  American  Express,  Visa,  or 
MasterCard  is  accepted.  Make  checks  payable  to  COMPUTE!  Publications. 

Form:  Ads  are  subject  to  publisher's  approval  and  must  be  either  typed  or  legibly 
printed.  One  line  equals  40  letters  and  spaces  between  vifords.  Please  underline 
words  to  be  set  in  boldface. 

Qeneral  Information:  Advertisers  using  post  office  box  numbers  in  their  ads  must 
supply  permanent  address  and  telephone  numbers.  Orders  will  not  be  acknowl- 
edged. Ad  Vk-ill  appear  in  next  available  issue  after  receipt. 

Closing:  10th  of  the  third  month  preceding  cover  date  (e.g.,  June  issue  closes  March 
10th).  Send  order  and  remittance  to:  Harry  Blair,  Classified  Manager,  COMPUTE!, 
P.O.  Box  5406,  Greensboro,  NC  27403.  To  place  an  ad  by  phone,  call  Harry  Blair  at 
(919)  275-9809. 

Notice:  COMPUTE!  Publications  cannot  be  responsible  for  offers  or  claims  of 
advertisers,  but  will  attempt  to  screen  out  misleading  or  questionable  copy. 
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COMPUTEi's  Guide 
To  Typing  in  Programs 


Computers  are  precise — type  the  pro- 
gram exactly  as  listed,  including  neces- 
sary punctuation  and  symbols,  except 
for  special  characters  noted  below.  We 
have  provided  a  special  listing  conven- 
tion as  well  as  a  progrann  to  check  your 
typing — "The  Automatic  Proofreader." 

Progrann  for  the  IBM,  TI-99/4A, 
and  Atari  ST  models  should  be  typed 
exactly  as  listed;  no  special  characters 
are  used.  Programs  for  Commodore, 
Apple,  and  Atari  400/800/XL/XE 
computers  may  contain  some  hard-to- 
read  special  characters,  so  we  have  a 
listing  system  that  indicates  these  con- 
trot  characters.  You  will  find  these 
Commodore  and  Atari  characters  in 
curly  braces;  do  not  type  the  braces.  For 
example,  {CLEAR}  or  {CLR}  instructs 
you  to  insert  the  symbol  which  clears 
the  SCTeen  on  the  Atari  or  Commodore 
machines.  A  complete  list  of  these  sym- 
bols is  shown  in  the  tables  below.  For 
Commodore,  Apple,  and  Atari,  a  single 
symbol  by  itself  within  curly  braces  is 
usually  a  control  key  or  graphics  key.  If 
you  see  {A},  hold  down  the  CONTROL 
key  and  press  A.  This  will  produce  a 
reverse  video  character  on  the  Commo- 
dore {in  quote  mode),  a  graphics  char- 
acter on  the  Atari,  and  an  invisible 
control  character  on  the  Apple. 

Graphics  characters  entered  with 
the  Commodore  logo  key  are  enclosed 
in  a  special  bracket:  [<A>J.  In  this  case, 
you  would  hold  down  the  Commodore 
logo  key  as  you  type  A.  Our  Commo- 
dore listings  are  in  uppercase,  so  shifted 
symbols  are  underlined.  A  graphics 
heart  symbol  (SHIFT- 5)  would  be  listed 
as  S.  One  exception  is  {SHIFT- 
SPACE}.  When  you  see  this,  hold  down 
SHIFT  and  press  the  space  bar.  If  a 
number  precedes  a  symbol,  such  as  {5 
RIGHT},  {6  S},  or  f=:8  Q>[,  you  would 
enter  five  cursor  rights,  six  shifted  S's, 
or  eight  Commodore-Q's.  On  the  Atari, 
inverse  characters  (white  on  black) 
should  be  entered  with  the  inverse  video 


Atari  400/800/XL/XE 

Wtien  you  see       Type 


{ CLEAR > 

tUP} 

{DOWNS 

tLEFTJ 

CRIBHT> 

CBACK  S> 

CDELETEJ 

C INSERTS 

tDEL  LlhO 

{INS  LINe> 

{TAB> 

<CLR  TAB> 

CSET  TAB> 

{BELL> 

iESCy 


ESC 
ESC 
ESC 
ESC 
ESC 

esc 

ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 


SHIFT  < 
CTRL  - 
CTRL  = 
CTRL  + 
CTRL  « 
DELETE 
CTRL  DELETE 
CTRL  INSERT 
SHIFT  DELETE 
SHIFT  INSERT 
TAB 

CTRL  TAB 
SHIFT  TAB 
CTRL  2 
ESC 


See 


a 
u 

E3 

a 
a 


Clear  Screen 
Cursor  Up 
Cursor  Down 
Cursor  Left 
Cursor  Right 
Backspace 
Delete  character 
Insert  character 
Delete  line 
Insert  line 
TAB  key 
Clear  tab 
Set  tab  stop 
Ring  buzzer 
Escape  key 


Commodore  PET/CBM/VIC/64/1 28/1 6/+4 

Press:  See: 


When  You 
Read; 


When  Ybu 
Read: 


Press: 


(CLR} 

{home; 

{UP! 

{DOWN) 

{LEFT} 

{RIGHT} 

{RVS} 

{OFF) 

{BLK} 

{WHT} 

{RED) 

{CYN} 

{PUR} 

JGRN) 

jBLU} 

{YEL) 


CTRL 

I 

CTRL 

2 

CTRL 

3 

CTRL 

4 

CTRL 

5 

OltL 

6 

CTHL 

7 

CTRl 

8 

D 

Q 

Sii 


§5i 

g7§ 

{  Fl  ! 
{  F2  ) 
{  F3  ) 
{  F4  ) 
{  F5  ! 
{  F6} 
I  F7  } 
{F8  } 
4 


COMMODORE    j  1 

COMMODORE      2 

COMMODORE       3  I 

1  COMMODORE      4 

!                              1 

i  COMMODORE      S 

COMMODORE      6 

1  COMMODORE      7 

COMMODORE      8 

i     « 

SHIFT 

(1 

f3 

SHIFT 

(3 

B 

SHIFT 

IS 

17 

SHIFT 

(7 

4 

See: 


■I 
□ 


108     COMPUTEI     May  1966 


From  the  publishers  of  COMPUTE! 


May  1986 
COMPUTE!  Disk 


All  the  exciting  programs  from  the  past  three  issues  of  COMPUTE!  are  on 
one  timesaving,  error-free  floppy  disk  that  is  ready  to  load  on  your  Apple 
II,  II  +  ,  He,  and  lie  computers.  The  May  1986  COMPUTE!  Disk  contains  the 
entertaining  and  useful  Apple  programs  from  the  March,  April,  and  May 
1986  issues  of  COMPUTE!. 

The  May  1986  COMPUTE!  Disk  costs  $12.95  plus  $2.00  shipping  and  han- 
dling and  is  available  only  from  COMPUTE!  Publications, 

For  added  savings  and  convenience,  you  may  also  subscribe  to  the  COM- 
PUTE! Disk.  At  a  cost  of  only  $39.95  a  year  (a  $12.00  savings),  you'll  receive 
four  disks,  one  every  three  months.  Each  disk  will  contain  all  the  programs 
for  your  machine  from  the  previous  three  issues  of  COMPUTE!. 

This  is  an  excellent  way  to  build  your  software  library  while  you  enjoy  the 
quality  programs  from  COMPUTE!. 

Disks  and  subscriptions  are  available  for  Apple,  Atari,  Commodore  64  and 
128,  and  IBM  personal  computers.  Call  for  details. 

For  more  information  or  to  order  the  May  1986  COMPUTE!  Disk,  call  toll 
free  1-800-346-6767  (in  NY  212-265-8360)  or  write  COMPUTE!  Disk,  P.O. 
Box  5038,  RD.R.  Station,  New  York,  NY  10150. 


COMPUTE!  PublicationsJncS 


One  o'  the  ABC  PuDlishing  Companies 


key  {Atari  logo  key  on  400/800  models). 

Whenever  more  than  two  spaces 
appear  in  a  row,  they  are  listed  in  a 
special  format.  For  example,  (6 
SPACES}  means  press  the  space  bar  six 
times.  Our  Commodore  listings  never 
leave  a  single  space  at  the  end  of  a  line, 
instead  moving  it  to  the  next  printed 
line  as  {SPACE}. 

Amiga  program  listings  contain 
only  one  special  character,  the  left  ar- 
row («-)  symbol.  This  character  marks 
the  end  of  each  program  line.  Wherever 
you  see  a  left  arrow,  press  RETURN  or 
move  the  cursor  off  the  line  to  enter 
that  line  into  memory.  Don't  try  to  type 
in  the  left  arrow  symbol;  it's  there  only 
as  a  marker  to  indicate  where  each  pro- 
gram line  ends. 

The  Automatic  Proofreader 

Type  in  the  appropriate  program  listed 
below,  then  save  it  for  future  use.  The 
Commodore  Proofreader  works  on  the 
Commodore  128,  64,  Plus/4,  16,  and 
VlC-20.  Don't  omit  any  lines,  even  if 
they  contain  unfamiliar  commands  or 
you  think  they  don't  apply  to  your  com- 
puter. When  you  run  the  program,  it 
installs  a  machine  language  program  in 
memory  and  erases  its  BASIC  portion 
automatically  (so  be  sure  to  save  sever- 
al copies  before  running  the  program 
for  the  first  time).  If  you're  using  a 
Commodore  128,  Plus/4  or  16,  do  not 
use  any  GRAPHIC  commands  while 
the  Proofreader  is  active.  You  should 
disable  the  Commodore  Proofreader 
before  running  any  other  program.  To 
do  this,  either  turn  the  computer  off  and 
on  or  enter  SYS  64738  (for  the  64),  SYS 
65341  (128),  SYS  64802  (VIC-20),  or 
SYS  65526  (Plus/4  or  16).  To  reenable 
the  Proofreader,  reload  the  program 
and  run  it  as  usual.  Unlike  the  original 
VIC/64  Proofreader,  this  version  works 
the  same  with  disk  or  tape. 

On  the  Atari,  run  the  Proofreader 
to  activate  it  (the  Proofreader  remains 
active  in  memory  as  a  machine  lan- 
guage program);  you  must  then  enter 
NEW  to  erase  the  BASIC  loader.  Press- 
ing SYSTEM  RESET  deactivates  the 
Atari  Proofreader;  enter  PRINT 
USR(1536)  to  reenable  it. 

The  Apple  Proofreader  erases  the 
BASIC  portion  of  itself  after  you  run  it, 
leaving  only  the  machine  language  por- 
tion in  memory.  It  works  with  either 
DOS  3.3  or  ProDOS.  Disable  the  Apple 
Proofreader  by  pressing  CTRL-RESET 
before  running  another  BASIC  program. 

The  IBM  Proofreader  is  a  BASIC 
program  that  simulates  the  IBM  BASIC 
line  editor,  letting  you  enter,  edit,  list, 
save,  and  load  programs  that  you  type. 
Type  RUN  to  activate.  Be  sure  to  leave 
Caps  Lock  on,  except  when  typing  low- 
ercase characters. 


Once  the  Proofreader  is  active,  try 
typing  in  a  line.  As  soon  as  you  press 
RETURN,  either  a  hexadecimal  number 
(on  the  Apple)  or  a  pair  of  letters  (on  the 
Commodore,  Atari,  or  IBM)  appears. 
The  number  or  pair  of  letters  is  called  a 
checksum. 

Compare  the  value  displayed  on 
the  screen  by  the  Proofreader  with  the 
checksum  printed  in  the  program  list- 
ing in  the  magazine.  The  checksum  is 
given  to  the  left  of  each  line  number. 
Just  type  in  the  program  a  line  at  a  time 
(without  the  printed  checksum),  press 
RETURN  or  Enter,  and  compare  the 
checksums.  If  they  match,  go  on  to  the 
next  line.  If  not,  check  your  typing; 
you've  made  a  mistake.  Because  of  the 
checksum  method  used,  do  not  type 
abbreviations,  such  as  ?  for  PRINT.  On 
the  Atari  and  Apple  Proofreaders, 
spaces  are  not  counted  as  part  of  the 
checksum,  so  be  sure  you  type  the  right 
number  of  spaces  between  quote 
marks.  The  Atari  Proofreader  does  not 
check  to  see  that  you've  typed  the  char- 
acters in  the  right  order,  so  if  characters 
are  transposed,  the  checksum  still 
matches  the  listing.  The  Commodore 
Proofreader  catches  transposition  er- 
rors and  ignores  spaces  unless  they're 
enclosed  in  quotation  marks.  The  IBM 
Proofreader  detects  errors  in  spacing 
and  transposition. 

IBM  Proofreader  Commands 

Since  the  IBM  Proofreader  replaces  the 
computer's  normal  BASIC  line  editor,  it 
has  to  include  many  of  the  direct-mode 
IBM  BASIC  commands.  The  syntax  is 
identical  to  IBM  BASIC.  Commands 
simulated  are  LIST,  LLIST,  NEW, 
FILES,  SAVE,  and  LOAD.  When  listing 
your  program,  press  any  key  (except 
Ctrl-Break)  to  stop  the  listing.  If  you 
enter  NEW,  the  Proofreader  prompts 
you  to  press  Y  to  be  especially  sure  you 
mean  yes. 

Two  new  commands  are  BASIC 
and  CHECK.  BASIC  exits  the  Proof- 
reader back  to  IBM  BASIC,  leaving  the 
Proofreader  in  memory.  CHECK  works 
just  like  LIST,  but  shows  the  checksums 
along  with  the  listing.  After  you  have 
typed  in  a  program,  save  it  to  disk. 
Then  exit  the  Proofreader  with  the 
BASIC  command,  and  load  the  pro- 
gram as  usual  (this  replaces  the  Proof- 
reader in  memory).  You  can  now  run 
the  program,  but  you  may  want  to  re- 
save  it  to  disk.  This  will  shorten  it  on 
disk  and  make  it  load  faster,  but  it  can 
no  longer  be  edited  with  the  Proofread- 
er. If  you  want  to  convert  an  existing 
BASIC  program  to  Proofreader  format, 
save  it  to  disk  with  SAVE  "filename", A. 


Program  1:  Atari 
Proofreader 

By  Charles  Brannon,  Program  Editor 


100 

110 


120 

130 
140 

150 
160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 


GRAPHICS  0 

FOR  1=1536  TO  1700:REfl 

D  AsPQKE  I, As CK=CK+A:N 

EXT  I 

IF  CKO19072  THEN  ?  "E 

rror  in  DATA  Statement 

s.   Check  Typing.": END 


A=USR 

?  :? 

ead«r 

END 

DATA 

3,  201 

DATA 

8,243 

DATA 

6,  153 

DATA 

4,6,2 

DATA 

1,78, 

DATA 

,105, 

DATA 

,141, 

DATA 

238,  1 

DATA 

24,24 

DATA 

46,8, 

DATA 

,240 

DATA 

0,96 

DATA 

145,8 

DATA 

4,74 

DATA 

165,  2 

DATA 

8,  169 

DATA 

0,96 


( 1536) 

"Automatic  Proofr 
Now  Acti  vated .  " 

104,  160,  0, 185,26, 

,69,240,7 

200,200, 192,34,20 

,96, 200, 169, 74 

153, 26, 3,200, 169, 

,26,3, 162 

0,  189,0,220, 157,7 

32, 224, 16 

208,245, 169,93, 14 

6,  169,6,  141 

79,6,24, 173,4,228 

1 , 141 , 95 

6, 173, 5,228, 105,0 

96,6, 169 

0, 133,203,96, 247, 

25,241 , 93, 6 

244, 241 ,  115, 241 ,  1 

1,76, 205,238 

0,0, 0,0, 0,32,62,2 

201 

155, 240, 13, 201 , 32 

7,72,24, 101 

203, 133, 203, 104, 4 

72, 152, 72, 13B 

72, 160, 0, 169, 128, 

8,200, 192, 40 

208.249. 165.203.7 
74, 74, 24,  105 
161, 160,3, 145, 88, 
03,41 , 15, 24 

105. 161.200. 145. 8 
, 0, 133,203, 104 
170,  104,  168,  104, 4 


Program  2:  IBM  Proofreader 

By  Charles  Brannon,  Program  Editor 

10  'Automatic  Proo-f reader  Vers 
ion  3.0  (Lines  205,206  adde 
d/190  deleted/470,490  Chang 
ed  -froni  V2.0) 
100  DIM  L« ( 500 ),LNUM( 500): COLD 
R  0,7, 7! KEY  OFF:CLSsMAX=0: 
LNUM(0) -65536! 
110  ON  ERROR  GOTO  120: KEY  15, C 
HR»(4)+CHR«<70):ON  KEY (15) 
aOBUB  640: KEY  CIS)  ON: SOT 
O  130 
120  RESUME  130 

130  DEF  SEG=!cH40:W=PEEK(iH4A) 
140  ON  ERROR  GOTO  650: PRINT: PR 

INT"ProofrBader  Ready. " 
150  LINE  INPUT  L»:  Y=CSRLIN--INT 

CLENeL*)/W>-l; LOCATE  Y, 1 
160  DEF  SEB=0;POKE  1050,30:PDK 
E  1052, 34: POKE  1054,0: POKE 
1055, 79: POKE  1056, 13: POKE 
1057, 28; LINE  INPUT  L»:DEF 
SES;IF  L*=""  THEN  150 
170  IF  LEFT»(L», 1)="  "  THEN  L« 
'•MID«(L»,2):60T0  170 
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180  IF  VflL(LEFT*(L*,2))=0  AND 
MID»(L»,3,1>="  "  THEN  L*=M 
ID»(L«,4> 

200  IF  ASC{L*)>57  THEN  260  'no 
line  number,  therefore  co 
mm  and 

205  BL=INSTR(L*,  •■  "JilF  BL=0  T 
HEN  BL»=L»:BOTD  206  ELSE  B 
L*=LEFT*(L«,  BL-1) 

206  LNUM=VflL (BLt) : TEXT*=MID»  CL 
», LEN (STR*  tLNUM) ) +1 ) 

210  IF  TEXT»=""  THEN  60SUB  S40 

:IF  LNUM=LNUM(P)  THEN  6QSU 

B  560:BOTa  150  ELSE  150 
220  CKSUM=0:FOR  1=1  TO  LEN(L«) 

2  CKSUM= ( CKSUM+ftSC ( M I D» ( L* , 

l))tl)  AND  255: NEXT; LOCATE 
Y,l; PRINT  CHR*(65+CKSUM/1 

6 ) +CHR* ( 65+ ( CKSUM  AND  15)) 

+  "  "+L* 
230  GDSUB  540; IF  LNUM(PJ=LNUM 

THEN  L4(P)=TEXT«:BQTD  150 

'replace   line 
240   GDSUB   580;6OTO    150    'insert 

the   line 
260   TEXTt="":FOR    1=1    TD   LEN(L» 

) :  A=ASC  <mD»  (L«,  I )  ) :  TEXT»= 

TEXT*+CHR*(ft+32«(A>96   AND 

A<123));NEXT 
270    DELI«ITER=INSTR(TEXT«,"    ") 

2 CDMMAND»=TEXT*t ftRB«=" " : IF 
DELIMITER   THEN   COMMAND«=L 

EFT«  (TEXTS,  DEUMI TER-1 ) :  AR 

B»-M1D$<TEXT»,DELIMITER+1) 
ELSE    DELlmTER=INSTR(TEXT 

t,CHR«{34)):IF  DCLIMITER   T 

HEN  COMMAND«=LEFT$ { TE  XT* , D 

ELIMITER-1 ) ! ftRG«=MID*  <TEXT 

», DELIMITER) 
280  IF  COMMANDSO-LIST"  THEN  4 

10 
290  OPEN  "scrn:"  FOR  OUTPUT  AS 

«1 
300  IF  ARE*=""  THEN  FIRST=0;P= 

MAX-1;60TD  340 
310  DELIMITER=INSTR(AR6*, "-") : 

IF    DELIf1ITER=0    THEN    LNUM=V 

AL(ARG»);GaSUB   540;FIRST=P 

:SOTQ  340 
320  FIRST=VAL<LEFT«(ARG*,DELIM 

ITER) ) : LAST=VAL (MID*  C AR6*, 

DELIMITER+l) ) 
330  LNUM=FIRSTsGDSUB  540: FIRST 

=P:LNUM=LAST:BOSUB  540; IF 

P=0  THEN  P=MflX-l 
340  FOR  X=FIRST  TO  P : NS=« I D» ( S 

TR»(LNUM<X) ) ,2)+"  " 
350  IF  CKFLAG=0  THEN  A»="";eOT 

0  370 

360  CKSUM=0:fl4=N«+L*(X);FOR  1= 

1  TO  LEN(A»):Ct<SUM=(CKSUM+ 

ASC(MID«(A»,I))*I)  AND  255 

: NEXT: A*=CHR» (65+CKSUM/ 16) 

+CHR* (65+ ( CKSUM  AND  15))+" 
II 

370  PRINT  #1,A*+N*+L»(X) 

380  IF  INKEY*<>""  THEN  X=P 

390  NEXT  ; CLOSE  #1;CKFLAG=0 

400  GOTO  130 

410  IF  COMMAND*="LLIST"  THEN  D 

PEN  "Iptl:"  FDR  OUTPUT  AS 

ttllQOTO  300 
420  IF  COMMAND*"" CHECK"  THEN  C 

KFLAB=l:BOTO  290 
430  IF  C0Mt1ftND*<>"SfiVE"  THEN  4 

50 

440  BDSUB  600: OPEN  ARES  FOR  DU 
TPUT  AS  II1jARB*="":G0T0  30 
0 

450  IF  COMHANDtO-'LOAD"  THEN  4 
90 


460  GOSUE  600: OPEN  ARB*  FOR  IN 

PUT  A3  #1:MAX=0:P=0 
470  WHILE  NOT  E0F<1):LINE  INPU 

T  #1,L»:BL=INSTR(L«, "  ");B 

L«=LEFT*(L»,BL-1) :LNUM(P)= 

VAL (BL») : L* (P) =MID» (L«, LEN 

(STR* ( VAL (BL») ) ) +1 ) s  P=P+1 : 

MEND 
480  MAX=P: CLOSE  *H:GOTO  130 
490  IF  CDMMAND*="NEW"  THEN  INP 

UT  "Eraae  program  -  Are  yo 

u  sure" ;L*:  IF  LEFT»(L»,  D- 

"y"  OR  LEFT»(L*, 1)="Y"  THE 

N  MAX"0!LNUM(0)  ="65536  Is  GOT 

0  130: ELSE  130 
500  IF  CDMMAND*="BflSIC"  THEN  C 

OLOR  7, 0,0: ON  ERROR  BOTO  0 

: CLS: END 
510  IF  COMMAND*<>"FILES"  THEN 

520 
515  IF  ARG*=""  THEN  AR3S=-A= " 

ELSE  SEL°1;G0SUB  600 
517  FILES  ARGSsGOTO  130 
520  PRINT"Syntax  error": GOTO  1 

30 
540  P=0s WHILE  LNUM>LNUM(P)  AND 

P<  MAX ;  P'^P-*- 1 :  WEND :  RETURN 
560  MAX=MAX-i:FaR  X=P  TO  MAX:L 

NUM(X)=LNUM(X+1):L»(X)=L*( 

X+i): NEXT: RETURN 
580  MAX=MAX+1;F0R  X=MAX  TO  P+1 
STEP  - 1 : LNUM ( X ) =LNUM ( X-1 ) 

:L»(X)=Lt<X-l);NEXT:L«(P)= 

TEXT*: LNUM (P) -LNUM: RETURN 
600  IF  LEFT*(ARG*,1)<>CHR*(34) 
THEN  520  ELSE  ARG«='MID*(A 

RB«,2) 
610  IF  RIGHT* (ARB»,1)=CHR* (34) 
THEN  ARG*=LEFTt ( ARB* , LEN ( 

ARG*)-1) 
620  IF  SEL=0  AND  INSTRCARB*, ". 

")=0  THEN  ARG*=AR(3»+".BAS" 
630  SEL=0: RETURN 
640  CLOSE  «l:CKFLA6=0:PRINT"St 

Qpped.": RETURN  150 
650  PRINT  "Error  «"; ERR : RESUME 
150 

Program  3:  Commodore 
Proofreader 

By  Philip  Nelson,  Assistant  Editor 

10   VEC=PEEK(772)+256*PEEK<773) 

:LO=43:HI=44 
20    PRINT    "AUTOMATIC    PROOFREADE 

R  FOR  ";jIF  VEC=42364  THEN 

{SPACE} PRINT  "C-64" 
30  IF  VEC=50556  THEN  PRINT  "VI 

C-20" 
40  IF  VEC=35158  THEN  GRAPHIC  C 

LRsPRINT  "PLUS/4  &  16" 
50  IF  VEC=17165  THEN  L0=45:HI= 

46 5 GRAPHIC  CLR: PRINT "128" 
60  SA=(PEEK(L0)+256*PEEK(HI) )+ 

6:ADR=SA 
70  FOR  J=0  TO  166:READ  BYT:POK 

E  ADR, BYT : ADR=ADR+1 : CHK=CHK 

+BYT:NEXT 
80  IF  CHKO20570  THEN  PRINT  "* 
ERROR*  CHECK  TYPING  IN  DATA 
STATEMENTS  ":  END 
90  FOR  J=l  TO  StREAD  RF,LF,HF: 

RS=SA+RF:HB=lKT(RS/256) :LB= 

RS-(256*HB) 
100    CHK=CHK+RF+LF+HF:POKE   SA+L 

F^LBiPOKE    SA+HF,HB:NEXT 
110    IF   CHKO22054    THEN    PRINT    " 

*ERROR*    RELOAD    PROGRAM    AND 


{ SPACE }CHECK   PINAL  LIKE"!ES 

D 
120    POKE   SA+149,PEEK( 772) : POKE 

SA+150,PEEK(773) 
130    IF   VEC=17165    THEN    POKE    SA+ 

14, 22: POKE    SA+18, 23 :POKESA+ 

29,224: POKESA+139 , 224 
140    PRINT    CHRS(147);CHR5(17) ;" 

PROOFREADER   ACTIVE": SYS    SA 
150    POKE   HI, PEEK ( HI )+l: POKE    (P 

EEK(LO)+256*PEEK{HI))-1,0:N 

EW 
160    DATA    120,169,73,141,4,3,16 

9   3    141    5    3 
170    DATA   88,96,165,20,133,167, 

165,21,133,168,169 
180    DATA    0,141,0,255,162,31,18 

1,199,157,227,3 
190    DATA    202,16,248,169,19,32, 

210,255,169,18,32 
200    DATA  '210,255,160,0,132,180 

,132,176,136,230,180 
210    DATA    200,185,0,2,240,46,20 

1,34,208,8,72 
220    DATA    165,176,73,255,133,17 

6,104,72,201,32,208 
230    DATA   7,165,176,208,3,104,2 

08,226,104,166,180 
240   DATA   24,165,167,121,0,2,13 

3,167,165,168,105 
250    DATA   0,133,168,202,208,239 

,240,202,165,167,69 
260    DATA    168,72,41,15,168,185, 

211,3,32,210,255 
270    DATA    104,74,74,74,74,168,1 

85,211,3,32,210 
230   DATA   255,162,31,189,227,3, 

149,199,202,16,248 
290   DATA   169,146,32,210,255,76 

,86,137,65,66,67 
300    DATA   68,69,70,71,72,74,75, 

77,80,81,82,83,88 
310    DATA    13,2,7,167,31,32,151, 

116,117,151,128,129,167,136 

,137 

Program  4:  Apple 
Proofreader 

By  Tim  Victor,  Editorial  Programmer 


7 ha    TO  76B  + 
C  +  A:  POKE  I 


10  C  =  0:  FOR  I 

6S!  READ  A:C 

,A:  NEXT 
20  IF  C  <  >  7258  THEN  PRINT  "ER 

ROR  IN  PROOFREADER  DATA  STAT 

EMENTS":  END 
30  IF  PEEK  (190  f  256)  <  >  76  T 

HEN  POKE  56,0:  POKE  57,3:  CA 

LL  1002:  GOTO  50 
40  PRINT  CHR*  (4)  ;  "INttA«300" 
50  POKE  34,0:  HOME  !  POKE  34,1: 
VTAB  2:  PRINT  "PROOFREADER 

INSTALLED" 
60  NEW 

100  DATA  216,32,27,253,201,141 
110  DATA  208,60,138,72,169,0 
120  DATA  72,189,255,1,201,160 
130  DATA  240,8,104,10,125,255 
140  DATA  1,105, 0,72, 202, 20B 
150  DATA  238,104,170,41,13,9 
160  DATA  48,201,58,144,2,233 
170  DATA  57.141,1,4,138,74 
180  DATA  74,74,74,41,15,9 
190  DATA  49,201,58,144,2,233 
200  DATA  57,141,0,4,104,170 
210  DATA  169,141,96  ® 
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Managing  Files 

From 
Atari  ST  BASIC 


This  excerpt  from  COMPUTE!  Books' 
new  title  The  Elementary  Atari  ST 
demonstrates  how  to  zuork  with  the 
disk  system  and  hoxv  to  create  sequen- 
tial text  files  and  random  access  files. 
A  simple  program  for  keeping  and 
updating  an  address  book  illustrates 
various  file-handling  techniques. 


While  programming,  you  will  often 
find  that  subroutines  which  you 
wrote  for  one  application  can  be 
used  in  subsequent  programs  with 
no  modifications  or  with  minor 
changes.  ST  BASIC  provides  the 
MERGE  command  so  that  you  can 
transfer  these  subroutines  between 
programs  without  retyping  them. 
You  have  to  make  sure  your  sub- 
routines do  not  contain  the  same 
line  numbers  as  other  routines  with 
which  they  will  be  MERGEd,  but, 
otherwise,  MERGE  is  a  simple  pro- 
cedure. For  example,  enter  and  save 
this  program: 

10  CLEARW  2  :  FULLW  2 

20  FOR  X  =  1  TO  110  STEP  10 

30  NA$  =  "NAME*  "  +  STR$(X) 
40  GOSUB  200 


William  Sanders 


50  NEXT 
60  END 

Now  enter: 
SAVE  "PARTI" 

After  you  have  done  that,   enter 

NEW  and  do  the  next  program. 

200  REM  »****«*•♦***••••» 

210  REM  CENTERING  ROUTINE 

220  REM  •••••«••••*•••♦•» 

230  L  =  40  -INK  LEN(NAS)/2  ) 

240  PRINT  TAB{L)NA$ 

250  RETURN 

Next  enter: 
SAVE  "PART2" 

You  now  have  two  programs 
saved  as  files.  Neither  program  will 
work  by  itself.  If  you  tried  to  load 
them  with  the  LOAD  or  OLD  com- 
mand, as  soon  as  you  loaded  the 
second  one,  the  first  one  would  be 
wiped  out.  However,  with  the 
MERGE  command,  you  can  load 
them  separately.  Once  they  are 
both  loaded,  you  can  run  the  com- 
bined program,  and,  if  you  want, 
you  can  even  save  it  as  a  BAS  file. 
Key  in  this  sequence: 

MERGE  'TARTl" 
MERGE  'TART2" 

RUN 


At  this  point  everything  should 
work  just  fine.  Now  enter: 
SAVE  "COMBINE" 

You  now  have  a  BASIC  file  made 
up  of  the  two  combined  files.  As 
you  collect  useful  subroutines,  you 
can  keep  a  record  of  their  line  num- 
ber ranges,  and  it  will  be  possible  to 
write  a  program  simply  by  MERGE- 
ing  several  subroutines. 

Sequential  Text  Files 

Of  the  two  kinds  of  text  files  we  will 
discuss,  sequential  files  are  simpler 
to  work  with.  Random  access  files 
are  a  little  trickier,  but  can  be  ac- 
cessed faster  than  sequential  files. 
Using  sequential  and  random  ac- 
cess files,  it  is  possible  to  enter  data 
from  a  program  and  store  it  as  a  text 
file.  You  can  add  to  it,  change  it, 
and  retrieve  data  from  the  file. 

Creating  sequential  files.  The 
first  step  is  to  write  a  formatting 
program  which  will  create  a  sequen- 
tial file.  To  create  a  file: 

OPEN  "0",FiIe#,"FILENAME" 
PRINT#  or  PRINT*  USING  or  WRITE* 
CLOSE 

These  statements  take  care  of  ev- 
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erything  we  need  in  a  sequential 
file. 

Now  let's  begin  writing  our  ad- 
dress book  program,  which  will 
store  the  names  of  a  known  number 
of  people  who  sent  us  Christmas 
cards.  (Then  next  Christmas  we  can 
check  the  file  to  see  to  whom  we 
should  send  cards.) 

10  FULLW  2  :  CLEARW  2 

20  GOTOXY  1,10  :  INPUT  "HOW  MANY 

ENTRIES";N% 
30  DIM  NA$<N%) :  CLEARW  2 
40  FOR  X  =  l  TO  N% 
50  GOTOXY  1,10  :  PRINT  "NAME# 

";X;SPACE$(40) 
60  GOTOXY  9,10  :  INPUT  NA$(X> 
70  NEXT  X 

100  REM  ***************************** 
110  REM  PUT  DATA  INTO  SEQUEN- 
TIAL FILE 
120  REM  ****♦•••******•**••*•••••**•• 

130  OPEN  "0",#1,"XMAS.DAT" 
140  FOR  X  =  l  TO  N% 
150  FRINT#1,NA$(X) 
160  NEXT  X 
170  CLOSE 

After  you  enter  the  program, 
run  it,  and  remember  the  number  of 
names  you  entered.  Save  the  pro- 
gram under  the  name  MAKEFILE; 
we  will  come  back  to  it  later.  Enter 
FILES  from  BASIC  to  make  sure 
there  is  a  file  called  XMAS.DAT 
that  was  created  by  our  MAKEFILE 
program. 

The  next  step  is  to  read  our 
files,  using: 

OPEN  "I",'TILENAME" 
INPUT#  or  LINE  INPUT* 
EOF  check 
CLOSE 

The  next  program  will  OPEN 
XMAS,  INPUT  the  file,  check  EOF 
(end-of-file),  CLOSE  the  file,  and 
then  PRINT  out  the  contents  to  the 
screen.  Notice  the  similarities  and 
differences  between  it  and  our  pre- 
vious program  for  writing  files: 

10  FULLW  2  :  CLEARW  2 
20  REM  ************************* 
30  REM  READ  FROM  SEQUENTIAL 
FILE 

40  REM  ************************* 

50  OPEN  'T',#1,"XMAS.DAT" 

60  WHILE  NOT  EOF(l) 

70  INPUT#1,NA$ 

80  PRINT  NA$ 

90  WEND 

100  CLOSE 

After  you  run  the  program, 
save  it  under  the  filename  READ- 
FILE.  Using  the  EOF  function,  you 
do  not  have  to  know  the  number  of 
files  you  entered.  If  there  are  more 
files,  EOF(l)  (with  1  being  the  file 
number),  then  the  value  of  NOT 


EOF(l)  wit!  equal  0.  If  the  value  of 
NOT  EOF(l)  is  equal  to  -1,  then 
the  program  has  found  the  end-of- 
file. 

Using  the  WHILE-WEND 
statement,  we  check  for  the  case 
where  EOF  is  not  true.  When  this 
condition  is  met,  the  program  exits 
the  loop.  Notice  that  as  soon  as  we 
INFUT#  the  data  from  the  XMAS 
file,  we  printed  it  to  the  screen 
using  the  normal  PRINT  statement. 

Appending  sequential  files. 
So  far,  so  good.  We  have  a  program 
that  outputs  a  list  of  names  into  a 
data  file  and  one  that  inputs  those 
names  back  to  us.  What  happens, 
though,  if  we  want  to  add  some 
names  to  our  file?  Some  versions  of 
BASIC  have  an  Append  statement 
along  with  Open  and  Input.  How- 
ever, while  ST  BASIC  does  not 
have  such  a  statement,  it  is  a  simple 
matter  to  append  a  sequential  file.  It 
involves  two  steps: 


1.  Count  the  number  of  elements 
in  a  file  and  put  them  into  an 
array. 

2,  Enter  the  new  elements  at  the 
end  of  the  array,  and  overwrite 
the  old  file  with  the  combined 
data  in  the  array. 


10  FULLW  2  :  CLEARW  2 

20  REM  ************************* 

30  REM  READ  FROM  SEQUENTIAL 
FILE 

40  REM  ************************* 

50  INPUT  "HOW  MANY  NEW  NAMES 

TO  ADD";NN 
60  OPEN  'T',#1,"XMAS.DAT" 
70  WHILE  NOT  EOF(l> 
80  INPUT#1,NAS 
90  N  =  N  +  1 
100  WEND 
110  CLOSE 
200  REM  •••»»•••••••♦•••**** 

210  REM  LOAD  DATA  INTO  ARRAY 

220  REM  ******************** 

230  OPEN  'T',#1,"XMAS.DAT" 

240DIMNA$(N  +  NN) 

250  FORX  =  l  TO  N 

260  INPUT#I,NAS(X) 

270  NEXT 

280  CLOSE 

300  REM  ♦•»»**•••"• 

310  REM  ADD  NEW  DATA 

320  REM ** 

330  FORX  =  l  TO  NN 

340  INPUT  "NAME  PLEASE";NA$(X  +  N) 

350  NEXT 

400  REM  *♦•*♦*♦•••**♦•♦***• 

410  REM  COMBINE  OLD  AND  NEW 

420  REM  ••••"»••••••••••♦• 

430N%  =  N  +  NN 

440  OPEN  "0",#1,"XMAS.DAT" 

450  FORX  =  l  TO  N% 


460  PRINT#1,NA$(X) 
470  NEXT 
480  CLOSE 

You  can  use  this  method  of 
appending  files  for  simple  record 
keeping.  If  you're  really  ambitious, 
it  is  not  too  difficult  to  edit  the  array 
while  it  is  in  memory  and  change 
the  data.  However,  we  will  soon  be 
discussing  random  access  files,  and 
the  random  files  are  probably  better 
suited  for  creating  files  that  will 
requite  a  good  deal  of  manipulation. 

Now  we've  seen  how  to  output 
and  input  elements  of  a  single  file. 
However,  since  filenames  are  es- 
sentially nothing  but  strings,  we 
could  use  variables  to  do  much  of 
the  work  automatically.  This  next 
example,  "File  Manager,"  will  cre- 
ate, append,  and  read  any  text  fUe 
you  want.  It  handles  only  a  single 
string  element,  but  you  can  change 
that  if  you  want.  Save  the  program 
under  the  name  FILEMAN. 

A  shortcut:.  FILEMAN  is  rela- 
tively long,  but  certain  parts  of  it  are 
very  similar  to  earlier  routines  we 
have  written.  Rather  than  retyping 
everything,  we  will  use  the 
MERGE,  EDIT,  and  RENUM  func- 
tions. First,  enter  lines  10-120  from 
FILEMAN  below,  the  MENU  block, 
and  save  these  lines  as  FILEMAN. 
Load  MAKEFILE,  your  program  to 
create  sequential  files.  Then  enter: 

RENUM  130,10 
and  then  enter: 
MERGE  FILEMAN 

Compare  the  listings  of  previ- 
ous programs  we  have  written  to 
each  block  in  the  following  listing. 
When  you  find  a  match,  follow  the 
procedure  described  above  to 
merge  the  routines  into  their  proper 
places  in  FILEMAN  as  you  build 
your  File  Manager  program. 

File  Manager 

10  REM  "" 

20  REM  MENU 

30  REM  "" 

40  FULLW  2  :  CLEARW  2  :  RESTORE  : 

CLEAR 
50  FOR  X  =  l  TO  4  ;  READ  CHOICES 
60  GOTOXY  5,X*3  :  PRINT  X;". 

";CHOICES 
70  NEXT  X 
80  GOTOXY  3,17  :  PRINT  "CHOOSE  BY 

NUMBER"; 
90  A$-INPUT$(1) ;  A  =  VAL(A$) 
100  ON  A  GOSUB  CREATE.APPEND, 
VIEW,  EXIT 
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110  DATA  CREATE  NEW  FILE,ADD  TO 

FILE,READ  FILE,QUIT 
120  GOTO  40 
130  REM  •••••*****•••*• 
140  REM  CREATE  NEW  F^E 
150  REM  ••»••*•♦•••••*• 
160  CREATE: 

170  FULLW  2  :  CLEARW  2 
180  INPUT  "NAME  OF  FILE";NF$ 
190  GOTOXY  1,10  :  INPUT  "HOW 

MANY  ENTRIES";N% 
200  DIM  NA$<N%)  :  CLEARW  2 
210FORX  =  1  TO  N% 
220  GOTOXY  1,10  ;  PRINT  "NAME* 

"■X"SPACE$(40) 
230  GOTOXY  9,10  :  INPUT  NAS(X) 
240  NEXT  X 

260  REM  PUT  DATA  INTO  SEQUEN- 
TIAL FILE 
270  REM  *••••••***•****•••••**••***•* 

280  OPEN  "0",#1,NFS 

290FORX  =  1  TO  N% 

300  PRINT#1,NA$(X) 

310  NEXT  X 

320  CLOSE 

330  RETURN 

340  REM  ♦•••*••***"•*•••••♦ 

350  REM  ADD  TO  EXISTING  FILE 
360  REM  *»•••••••••••»»•♦*•• 

370  APPEND: 

380  FULLW  2  :  CLEARW  2 

390  REM  *********************** 

400  REM  READ  FROM  EXISTING  FILE 
410  REM  •♦****•*••*••*•••**•••• 
420  INPUT  "NAME  OF  FILE  TO 

APPEND";NF$ 
430  INPUT  "HOW  MANY  NEW  NAMES 

TO  ADD";NN 
440  OPEN  "I",#1,NF$ 
450  WHILE  NOT  EOF(l) 
460  INPUT#1,NAS 
470  N  =  N  +  1 
480  WEND 
490  CLOSE 

500  REM  ••*•**•••••****•**** 
510  REM  LOAD  DATA  INTO  ARRAY 

cjn  RPM  ******************** 

530  OPEN  "I",#1,NF$ 

540  DIM  NA$(N  +  NN) 

550FORX  =  1  TO  N 

560  INPUT#1,NA$(X) 

570  NEXT 

580  CLOSE 

590  REM  •♦•••»***•♦• 

600  REM  ADD  NEW  DATA 

610  REM  *******  f" 

620  FOR  X  =  l  TO  NN 

630  INPUT  "NAME  PLEASE";NA$(X  +  N) 

640  NEXT 

gen  17FM  ******************* 

660  REM  COMBINE  OLD  AND  NEW 
670  REM  »*•♦•••»»»*•»»»•••• 

680  N%  =  N  +  NN 

690  OPEN  "0",#1,NFS 

700  FOR  X  =  l  TO  N% 

710  PRINT#1,NA$(X) 

720  NEXT 

730  CLOSE 

740  RETURN 

750  REM  ************************* 

760  REM  READ  FROM  SEQUENTIAL 

FILE 
770  REM  ************************* 
780  VIEW; 

790  FULLW  2  :  CLEARW  2 
800  INPUT  "FILE  TO  READ";NF$ 
810  OPEN  'T',#1,NFS 


820  WHILE  NOT  EOF{l) 

830  INPUT#1,NAS 

840  PRINT  NA$ 

850  WEND 

860  CLOSE 

870  PRINT  :PRINT  "HIT  ANY  KEY  TO 

RETURN  TO  MENU" 
880  W$  =  INPUT$<1) 
890  RETURN 
900  REM  •»•*••••••*• 

910  REM  QUIT  PROGRAM 
920  REM  •*«•»•»•*••• 
930  EXIT: 
940  END 

Hand  Me  A  Line 

LINE  INPUT  and  LINE  INPUT  # 
can  be  very  handy  commands  for 
reading  and  writing  sequential  files. 
For  example,  let's  say  you  want  to 
enter  a  name,  address,  and  phone 
number  into  an  array,  store  the  ar- 
ray on  disk,  and  later  read  it  back. 
With  LINE  INPUT,  it  is  possible  to 
use  a  single  string  or  string  array 
variable  to  put  all  that  information 
in  at  once.  Likewise,  when  retriev- 
ing information  from  the  disk,  you 
can  get  a  whole  line  by  using  LINE 
INPUT  #. 

This  is  especially  useful  when 
you  are  reading  a  file  with  an 
unknown  format.  For  example,  let's 
say  that  you  want  to  read  the  con- 
tents of  a  disk,  but  don't  know 
whether  it  is  composed  of  strings  or 
numeric  values,  and  you  don't 
know  their  order.  By  using  LINE 
INPUT  #  and  a  string  variable,  you 
can  read  the  file  line  by  line  rather 
than  variable  by  variable. 

To  see  how  LINE  INPUT 
works,  enter  the  following  pro- 
gram. When  you  run  it,  be  sure  to 
include  commas  between  the  name, 
address,  and  phone  number. 
Unlike  the  INPUT  statement,  com- 
mas entered  from  the  keyboard 
when  using  LINE  INPUT  will  not 
result  in  an  error  message. 

10  REM  *" ** 

20  REM  LINE  INPUT 
30  REM  •*•••••••• 

40  FULLW  2  :  CLEARW  2 

50  GOTOXY  5,5  :  INPUT  "HOW  MANY 

ENTRIES";N% 
60  DIM  NAP$(N%) 
70  CLEARW  2 
80  FOR  X  =  1  TO  N% 
90  LINE  INPUT  "Name,  Address,  Phone 

";NAP$(X) 
100  NEXT  X 
200  REM  *********************** 

210  REM  PRINT  RESULTS  TO  SCREEN 

220  REM  *********************** 

230  CLEARW  2 

240  FOR  X  =  1  TO  N% 

250  PRINT  NAP$(X) 

260  NEXT 


The  program  does  not  do  any- 
thing with  files,  but  it  would  be  a 
simple  matter  to  have  it  PRINT  #  to 
the  disk  instead  of  to  the  screen. 
Change  the  block  beginning  at  line 
200  to  write  the  file  to  disk.  The 
name,  address,  and  phone  are  in 
one  string  with  the  delimiters 
preserved. 

Now,  we're  going  to  write 
information  to  disk  using  several 
variables,  and  then,  using  LINE  IN- 
PUT #,  we  are  going  to  read  the 
disk  with  a  single  string  variable. 
This  will  show  you  how  to  read  a 
line  of  variables  that  were  stored 
either  as  separate  variables  or  as  a 
single  LINE  INPUTed  variable. 

10  FULLW  2  :  CLEARW  2 

20  GOTOXY  5,5  :  INPUT  "HOW  MAN 

Y  ENTRIES";N% 
30  GOTOXY  5,5  :  PRINT  SPACE$(40):  DI 

M  NA$(N%),AD$(N%),PH$(N%) 
40FORX  =  1  TON% 
50  INPUT  "NAME";NA$(X) 
60  INPUT  "ADDRESS";ADS{X) 
70  INPUT  "PHONE";PH$(X) 
80  NEXT  X 

100  REM  ♦•**•»***♦•••♦ 
110  REM  OUTPUT  TO  DISK 
120  REM  •••••••♦•»•♦*• 

130  OPEN  "0",#1,"NAMEAD" 

140  FOR  X  =  l  TO  N% 

150PRINT#1,NA$(X);",";AD$(X);",";PH$( 

X) 
160  NEXT  X 
170  CLOSE 
200  REM  ********************* 

210  REM  READ  WITH  LINE  INFUT# 

220  REM  •*♦***•********•*•**• 

230  CLEARW  2 :  GOTOXY  5,5  ;  PRINT  "Hi 

t  any  key  to  continue"; 
240  ANS  =  INPUTS(1)  :  CLEARW  2 
250  OPEN  'T',#1,"NAMEAD" 
260  ON  ERROR  GOTO  300 
270  LINE  INFUT#1,NAPS 
280  PRINT  NAP$ 
290  GOTO  270 
300  CLOSE 

310  LOOKS  =  INPUTS(1) 
320  END 

As  you  saw  when  the  program 
executed,  the  variables,  along  with 
their  printed  format  established  in 
line  150,  were  read  and  displayed 
with  a  single  string  variable.  This  is 
where  LINE  INPUT  #  can  save  time 
and  guessing.  Of  course,  it  would 
have  been  even  simpler  to  use  LINE 
INPUT  when  we  entered  the  infor- 
mation originally,  but  the  program 
was  designed  to  show  you  how 
LINE  INPUT  #  works  when  reading 
files  created  vrith  several  variables. 

We  also  introduced  another 
way  to  determine  the  end  of  a  file. 
While  the  EOF  statement  is  the  pre- 
ferred method,  you  can  also  use 
ON  ERROR  GOTO  to  jump  out  of 
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an  error.  When  the  end-of-file  error 
occurs,  the  program  jumps  to  the 
line  that  CLOSEs  the  file.  Be  careful 
in  using  ON  ERROR  GOTO,  be- 
cause there  will  be  times  when 
some  bug  in  your  program  will 
cause  an  error  rather  than  the  error 
condition  you  intended  to  trap  for. 

PRINT  #  USING  And  Files 

A  final  way  to  store  information  on 
disks  is  with  PRINT  #  USING, 
which  sends  data  to  the  disk  much 
like  the  PRINT  USING  statement 
outputs  to  the  screen.  The  format  is 
slightly  different,  but  the  statement 
works  essentially  the  same  way. 
PRINT  #  USING  is  very  handy  in 
programs  which  process  formatted 
numeric  data: 


10  REM  »••••••••»*•****»• 

20  REM  ENTER  NUMERIC  DATA 
30  REM  ****************** 

40  FULLW  2  :  CLEARW  2 

50  GOTOXY  5,5  ;  INPUT  "HOW  MAN 

Y  ENTRIES";N% 
60  GOTOXY  5,5  ;  PRINT  SPACE$(20) :  DI 

M  AMOUNT(N%> 
70  FOR  X  =  l  TO  N% 
80  GOTOXY  10,5  :  PRINT  SPACE$(2 

0)  :  GOTOXY  5,5  :INPUT  "HOW  MUC 

H";AMOUNT(X) 
90  NEXT  X 

100  REM  *••♦•••*•*•*••*••***•*•*•♦•*•• 
*** 

110  REM  WRITE  TO  DISK  WITH  PRIN 
T  #,  USING 

120  REM  ****************************** 
«** 

130  GOTOXY  5,5  ;  PRINT  SPACE$(20) 
140  OPEN  "0",#1,"EXPENSES" 
150FORX  =  1  TO  N% 
160  TOTAL  =  TOTAL +  AMOUNT(X) 
170  PRINT  #1,  USING  "####.##";AM 

OUNT(X),TOTAL 
180  NEXT  X 
190  CLOSE 
200  PRINT  "Hit  any  key"  :  LOOKS =INP 

UT${1) 

When  you  read  your  file,  all  of 
the  data  will  be  formatted  for  you. 
Instead  of  using  the  variables  you 
originally  employed,  use  LINE  IN- 
PUT #.  Thus,  the  following  pro- 
gram will  read  and  display  your 
information  as  you  wrote  it  to  disk: 

300  OPEN  "I",#1,"EXPENSES" 
310  ON  ERROR  GOTO  350 
320  LINE  INPUT#1, EXPENSES 
330  PRINT  EXPENSES 
340  GOTO  320 
350  CLOSE 

360  PRINT  "Hit  any  key"  :  LOOKS  = 
INPUTS(l) 

Random  Access  Flies 

Random  access  files  are  like  con- 
tainers of  equal  size  into  which  you 


store  data.  You  first  decide  how  big 
a  container  you  will  need,  based  on 
the  maximum  size  of  the  material 
you  will  be  putting  in  the  box.  Each 
character  in  a  string  takes  one  byte. 
Therefore,  if  your  maximum  length 
for  a  given  string  is  ten,  it  will  be 
necessary  to  allocate  a  total  of  ten 
bytes.  With  numbers,  storage  is  dif- 
ferent. Here's  a  chart  for  quick  ref- 
erence on  how  much  memory  space 
to  allocate  for  the  different  kinds  of 
data: 


Type  Allocation 

String  1  byte  per  character 

Integer  2  bytes  per  number 

Single -precision  4  bytes  per  number 

Double-precision  8  bytes  per  number 


All  entries  into  a  random  ac- 
cess file  must  be  in  string  format, 
including  numbers;  we  will  exam- 
ine the  functions  for  doing  that  lat- 
er. For  now,  we  will  concentrate  on 
entering  data  as  normal  strings. 

For  the  most  part,  the  process 
of  creating  and  reading  random  ac- 
cess files  looks  very  much  like  se- 
quential files,  but  there  are 
important  differences.  For  instance, 
when  you  OPEN  a  random  access 
file,  you  must  include  the  length  of 
the  file.  First,  as  we  did  with  se- 
quential files,  we  OPEN  the  file  and 
place  the  filename  in  quotes.  How- 
ever, instead  of  writing  the  mode, 
we  indicate  the  file  number  and  the 
length  of  our  file.  Here  is  the 
format: 
OPEN  "R",#l,"NAMEFr",128 

With  this  statement  we  can  either 
write  to  the  disk  file  or  read  from  it. 
Unlike  with  sequential  files,  we  do 
not  indicate  whether  the  mode  is 
output  or  input  when  we  OPEN  a 
random  access  file. 

Random  access  files  can  be  un- 
divided or  divided.  Undivided  files 
use  the  same  length  for  every  entry. 
For  the  most  part,  it  is  pointless  to 
use  undivided  files  unless  you  are 
entering  a  single  field,  such  as  a  list 
of  names  with  no  other  infor- 
mation, or  when  you  put  all  the 
information  into  a  single  string  as 
we  did  with  LINE  INPUT  #.  It  is 
more  useful  to  divide  random  ac- 
cess files  into  sections  called  fields, 
with  each  field  having  a  maximum 
length.  The  FIELD  statement  ex- 
pects a  file  number,  width,  and 
string  variable: 


FIELD  #1,  20  AS  AS,  10  AS  B$,  2  AS  CS 

The  above  statement  sets  the 
width  of  A$  to  20,  B$  to  10,  and  C$ 
to  2.  When  the  file  is  OPENed,  the 
LENgth  value  (the  last  value  en- 
tered in  the  OPEN  statement)  must 
equal  the  sum  of  the  FIELD  values. 
In  the  above  example,  the  length 
must  be  20  +  10  +  2  =  32.  When 
OPENing  the  R  file  (R  is  used  for 
both  input  and  output),  the  last  val- 
ue would  be  32, 
OPEN  "R",#1,"FILENAME",32 

To  illustrate  using  random  ac- 
cess files,  let's  modify  our  address 
book  program.  We  will  call  the  file 
we  create  HOMETOWN,  using 
three  strings.  Before  we  can  enter 
the  data  into  a  random  access  file, 
we  have  to  use  the  LSET  statement 
to  store  our  records  in  their  respec- 
tive fields.  Moreover,  the  variable 
names  we  LSET  cannot  be  the  same 
ones  we  INPUT.  Therefore,  we 
have  two  sets  of  variables,  one  for 
INPUT  and  one  for  LSET.  The  nice 
thing  about  LSET  is  that  it  automat- 
ically pads  the  strings  with  suffi- 
cient spaces  to  fit  the  field  exactly, 
or  it  truncates  the  string  if  it  is  too 
long. 

Here  is  a  list  of  our  variable 
names: 

NAS  for  a  person's  name  LSET  =  N$ 

CT$  for  the  city's  name  LSET  =  C$ 

SC$  for  the  sta'te's  mailing  LSET  =  SS 
code 

Since  we'll  be  dealing  with  the 
names  of  people  and  cities  and  thus 
the  fields  will  be  of  differing 
lengths,  we'll  have  to  decide  on  a 
maximum-size  name.  Longer 
names  will  be  truncated  to  this 
specified  size.  This  process  is  ex- 
tremely important  in  working  with 
random  access  files  since  we  are 
limited  to  the  number  of  bytes  spec- 
ified when  we  OPEN  a  file.  Without 
the  truncate  feature,  entries  over 
the  maximum  length  would  spill 
over  into  the  next  record.  There- 
fore, we  will  limit  the  length  of  a 
name  to  20,  a  city  to  10,  and  states 
to  the  two-character  abbreviations 
employed  by  the  post  office: 


N$ 

= 

20 

C$ 

= 

10 

SS 

= 

2 

Total       =32 


Using   these  values,   we   can 
now  write  a  program  to  enter  a 
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single  record  into  a  random  access 
file: 

10  CLEARW2  :  NR%  =  1 
20  GOTOXY  1,4  :  INPUT  "NAME";NA$ 
30  GOTOXY  1,6  :  INPUT  "CITY";CT$ 
40  GOTOXY  1,8  :  INPUT  "STATE 

CODE";SC$ 
100  REM  •••••••••••*••♦•»• 

110  REM  WRITE  SINGLE  RECORD 
120  REM  ****»•»••»»•»•»•** 
130  OPEN  "R",#l,"HOMETOWN",32 
140  FIELD  #1,  20  AS  N$,10  AS  C$,2  AS 

S$ 
150  LSET  N$  =  NA$ 
160  LSET  C$  =  CT$ 
170  LSET  S$  =  SC$ 
180  PUT  #1,NR% 
190  CLOSE 
200  END 

That  was  a  lot  of  work  to  enter 
one  simple  record,  but  be  patient 
and  we  will  do  more.  Now,  we  will 
GET#  a  record  from  a  random  ac- 
cess file.  As  in  writing  to  random 
access  files,  we  must  OPEN  the  file 
with  a  specified  length  and  read  it 
in  terms  of  a  specified  record.  The 
following  program  will  read  record 
1  in  the  HOMETOWN  file: 

10  CLEARW  2:  NR%  =  1 

20  REM  ****************** 

30  REM  READ  SINGLE  RECORD 

40  REM  **♦•♦*»•••******•• 

50  OPEN  "R",#l,"HOMETOWN",32 

60  FIELD  #1,  20  AS  N$,10  AS  C$,2  AS  S$ 

70  GET  #1,NR% 

80  PRINT  N$:PRINT  C$;",'';S$ 

90  CLOSE 

100  END 

We  had  to  write  quite  a  lot  just 
to  write  and  read  a  single  record, 
but  this  illustrates  how  randcfm  ac- 
cess files  operate.  Now  we  can  deal 
with  multiple  records  with  our 
HOMETOWN  example. 

Our  next  task  is  to  create  a 
sequential  file  to  keep  track  of  our 
pointers  in  the  random  access  file. 
Basically,  a  pointer  routine  will 
check  the  sequential  file  and  tell  us 
which  record  number  was  the  last 
one  we  wrote,  and  then  it  will  move 
the  pointer  to  the  next  record  num- 
ber. For  instance,  if  there  are  ten 
records  in  a  random  access  file,  we 
want  the  pointer  10  to  be  stored 
somewhere  we  can  easily  get  it. 
When  we  want  to  add  to  a  random 
access  file,  we  can  then  find  the 
value  10,  add  1  to  it,  and  begin 
writing  our  record  at  position  11. 
We  will  call  this  file  HOMEPOINT. 

10  CLEARW  2:  GOTOXY  1,1 
20  INPUT  "How  many  new  entries";NE% 
30  FORX  =  l  TO  NE% 
40  GOTOXY  4,4  :  PRINT  SPACE$(25)  :  GO 
TOXY  1,4  :  INPUT  "NAME";NA$ 


50  GOTOXY  4,6  :  PRINT  SPACES(25)  ;  GO 

TOXY  1,6  :  INPUT  "CITY";CT$ 
60  GOTOXY  7,8  :  PRINT  SPACES(25)  ;  GO 

TOXY  1,8  1  INPUT  "STATE  CODE";S 

C$ 
70  IF  X  =  l  THEN  GOSUB  100  ELSE  GOS 

UB200 
80  NEXT  X 
90  GOTO  400 
100  REM  *•*•♦•*••••••••*« 

110  REM  FIND  LAST  POINTER 
120  REAd  •*••««•*••*•**«** 

130  OPEN  "l",#l,"POINT" 
140  INPUT  #l,POINTER% 
150  CLOSE 
200  REM  *••••»••••*•••••• 

210  REM  WRITE  RANDOM  FILE 
220  RiE\f  ***««**•■(«•«***** 

230  POINTER  %  =  POINTER%  +  l 
240  OPEN  "R",#2,"HOMETOWN",32 
250  FIELD  #2,  20  AS  N$,10  AS  C$,2  A 

SS$ 
260  LSETN$  =  NAS 
270  LSET  C$  =  CT$ 
280  LSET  S$  =  SCS 
290  PUT  #2,P0INTER% 
300  CLOSE 
310  RETURN 
400  RE\f  ************** 

410  REM  UPDATE  POINTER 
420  REM  •••«•••••••••• 

430  OPEN  "0",#1,'T0INT" 
440  PRINT#l,POINTER% 
450  CLOSE 
460  END 

The  first  time  you  run  this  pro- 
gram, you  must  initialize  the 
POINT  file.  To  do  this,  enter  GOTO 
400  the  first  time  you  run  the 
program. 

Now  that  we  have  several  re- 
cords in  our  file,  we  will  need  a  way 
to  get  them  out  again.  Here's  where 
our  counter  variable  POINTER 
comes  in  handy.  First,  we  will  read 
POINTER  to  see  how  many  records 
there  are  and  then  loop  through  the 
records  to  GET#  them  all.  Nodce 
that  in  line  60,  we  first  INPUT#1 
POINTER  and  after  INPUTing  it 
into  memory,  it  is  used  in  the  FOR- 
NEXT  loop  in  line  150  to  pull  all  the 
records  out. 

10  FULLW  2  :  CLEARW  2 
20  REM  **•••♦•»••••••»»• 

30  REM  FIND  LAST  POINTER 

40  REM  ***************** 

50  OPEN  "r',#l,"POINT" 
60  INPUT  #l,POINTER% 
70  CLOSE 
100  REM  •••••••♦♦*»«•**•• 

110  REM  READ  RANDOM  FILE 
120  REM  ***************** 
130  OPEN  "R",#2,"HOMETOWN",32 
140  FIELD  #2,  20  AS  N$,10  AS  C$,2  AS 

S$ 
ISO  FOR  X  =  l  TO  POINTER% 
160  GET  #2,X 

170  PRINT  N$rPRINT  C$;",";S$:PRINT 
180  NEXT 
190  CLOSE 
200  LOOKii  =  INPUTS(l) 


By  adding  a  few  lines  and  cal- 
culating a  few  more  bytes,  you  can 
expand  our  example  program  into  a 
very  useful,  customized  address 
list.  The  program  already  enters 
names,  cities,  and  states.  All  you 
have  to  add  are  addresses  and  zip 
codes,  and  there  you  have  it.  By 
attaching  a  subroutine  to  send  it  to 
your  printer,  you  could  generate 
your  own  mailing  list  program. 

More  File-Handling 
Commands 

Most  file  applications  deal  with 
strings,  but  there  are  many  applica- 
tions which  require  the  use  of  num- 
bers instead.  Instead  of  using  STR$ 
to  convert  numbers  into  strings,  we 
can  use  MKI$,  MKS$,  and  MKD$. 
The  /,  S,  and  D  in  the  commands 
stand  for  Integer,  Single-precision, 
and  Double-precision  number  con- 
versions. Unfortunately,  these  con- 
versions translate  your  numbers 
into  ASCII  code,  so  you  have  to 
convert  them  back  to  numbers  using 
CVI,  CVS,  and  CVD  before  you  use 
them  in  arithmetic  operations. 

Let's  see  how  they  are  used 
with  files.  First,  create  a  numeric 
variable   TOTAL.    For   a    single- 
precision  number,  TOTAL  would 
take  four  bytes,  or  two  for  integers 
and  eight  for  double  precision.  We 
will  call  our  string  SUM$,  so  we 
would  define  our  FIELD  as: 
FIELD  #2,  4  AS  SUM$ 
Then  with  LSET,  we  would  put: 
LSET  SUM$  =  MKSS(TOTAL) 

Finally,  once  we  read  SUM$  from 
our  file,  if  we  want  to  reconvert  it  to 
a  numeric  variable,  we  would  enter: 
TOTAL  =  CVS(SUM$) 

By  making  the  conversions  to 
and  from  string  and  numeric  vari- 
ables, we  can  store  strings  in  ran- 
dom access  files,  yet  use  numeric 
variables  in  programs  where  the  val- 
ues are  used  as  real  numbers.  This 
applies  only  to  random  access  files, 
for  we  saw  how  we  could  store  and 
update  numeric  variables  in  sequen- 
tial files  with  no  conversions. 

There  is  a  great  deal  more  you 
can  do  with  files;  this  introductory 
look  at  them  just  scratches  the  sur- 
face. It  is  possible  to  make  database 
systems  that  search  for  individual 
records,  change  individual  records, 
sort  records,  and  more.  ® 
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BASIC  Equivalents  In  C 


One  of  the  hottest  programming  top- 
ics these  days  is  the  C  language.  C  is 
the  language  of  choice  for  many  pro- 
fessional programmers  because  it's 
easy  to  write  and  produces  compact, 
efficient  machine  language  code.  An- 
other plus  is  that  C  programs  are  easy 
to  transport  from  one  computer  to 
another.  For  those  who  may  be  new  to 
C,  here's  an  article  that  describes  sim- 
ilarities between  BASIC  and  C.  It's 
excerpted  from  a  chapter  in  From 
BASIC  To  C,  currently  available 
from  COMPUTE!  Books, 


From  a  beginner's  viewpoint,  one 
of  the  reassuring  aspects  of  the  C 
language  is  that  it  has  many  things 
in  common  with  BASIC.  You  can 
write  a  large  part  of  your  C  program 
using  statements  that  are  just  like  or 
very  similar  to  BASIC  statements. 
Of  course,  they  have  no  line  num- 
bers, are  written  with  lowercase  let- 
ters, and  end  with  a  semicolon.  But 
they  use  the  same  keywords  as 
BASIC  statements,  and  perform  the 
same  or  nearly  the  same  operations. 
These  are  the  C  language  state- 
ments that  are  equivalent  to  BASIC 
statements: 

1.  Assignment  statement 

2.  if  statement 

3.  for  loop 

4.  while  loop 

5.  goto  statement 

Assignment  Statement 

The  assignment  statement  assigns  a 
value  to  a  variable.  The  value  may 
be  that  of  a  constant,  another  vari- 
able, an  expression,  or  a  function. 
An  assignment  statement  in  BASIC 
is; 

100  ITEM  =  4875 

The  C  equivalent  is: 

item  ~  4875; 

Same  thing  ...  almost.  BASIC  is 
very  secretive  about  the  type  of  a 
variable.  ITEM  is  automatically  as- 
signed single-precision  type,  and 
the  constant  4875  is  assigned  integer 
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type.  The  integer  is  converted  to 
single  precision  and  stored  as  a 
single-precision  variable. 

C  does  not  assign  a  type  to  a 
variable  automatically.  The  ex- 
ample shown  would  result  in  an 
error  message  unless  it  had  been 
preceded  by  a  declarator.  This  par- 
ticular declarator  assigns  type  float 
to  variable  item: 
float  Item; 

C's  float  variable  is  identical  to 
the  single-precision  variable  in 
BASIC.  It  is  a  real  number  provid- 
ing six  to  seven  digits  of  precision. 
The  constant  is  assigned  integer 
type  in  C  also.  It's  converted  to 
float  type  and  stored  as  the  value  of 
item. 

The  statements  are  the  same  in 
both  languages.  The  difference  is 
that  C  requires  you  to  declare  vari- 
ables, which  shows  you  at  a  glance 
which  variables  you're  using  and 
what  type  they  are.  Automatic  as- 
signment of  types  in  BASIC  some- 
times provides  strange  answers; 
specific  declaration  of  variables  in  C 
puts  you  in  the  driver's  seat. 

C,  like  some  versions  of 
BASIC,  includes  a  type  of  assign- 
ment statement  that  assigns  the 
same  value  to  more  than  one 
variable: 
suml  =  sums  =  suin3  =  0; 

This  statement  assigns  the  val- 
ue of  0  to  variable  sumS  first.  Then 
it  assigns  the  value  of  sum3  to  vari- 
able sumZ.  Last  of  all,  it  assigns  the 
value  of  sumZ  to  variable  suml.  You 
can  use  any  variable  or  expression 
to  the  right  of  the  rightmost  equal 
sign  (instead  of  the  0). 

Here's   another   example   in 
BASIC: 
380  AVE  =  (VALl  +  VAL2  +  VAL3)  /  3 

The  C  language  statement  is: 
ave  =  (vail  -I-  val2  -I-  val3)  /  3; 

The  BASIC  statement  adds 
three  single-precision  values,  con- 
verts the  integer  3  to  single  preci- 
sion, and  performs  single -precision 


division.  The  result  is  stored  as  a 
single-precision  variable. 

Assuming  that  vail,  vail,  val3, 
and  ave  have  been  declared  as  float 
type,  the  C  statement  provides  the 
same  result,  but  in  a  different  way. 
A  C  program  performs  no  float 
type  computations.  Instead,  the 
program  that  contains  this  state- 
ment converts  vail,  vail,  val3,  and 
integer  3  to  type  double,  and  per- 
forms the  computations.  Type  dou- 
ble is  a  real-number  type  that 
provides  16  to  17  digits  of  preci- 
sion. When  it's  converted  and 
stored,  the  result  is  more  accurate 
(potentially,  at  least)  than  if  the  re- 
sult had  been  type  float. 

If  vail,  vail,  and  val3  are  de- 
clared as  integers,  you  should  use  a 
float  type  constant: 
ave  =  (vail  -I-  val2  -I-  val3)  /  3.0; 

The  program  adds  the  integers, 
converts  the  sum  and  constant  to 
type  double,  performs  the  compu- 
tations, and  converts  the  result  to 
float.  Using  3  instead  of  3.0  would 
have  caused  all  the  numbers  to  be 
treated  as  integers,  and  an  integer 
result  would  have  been  converted 
to  float  and  stored.  This  would 
probably  not  be  accurate  enough. 

Here's  a  more  complex  BASIC 
statement  that  includes  a  function; 
500  SIDEl  =  SIN(A)  •  HYP 

The  C  equivalent  is; 

sidel  =  sln(a)  *  hyp; 

The  BASIC  example  calls  the 
SIN  function.  Some  versions  of  the 
interpreter  return  a  double- 
precision  result,  but  most  return  a 
single-precision  result.  The  result  is 
a  single -precision  value  in  variable 
SIDEl. 

In  C,  the  result  is  the  same,  but 
the  computations  are  double  type. 
The  function,  however,  is  in  one  of 
the  libraries  that  came  with  your  C 
compiler.  The  statement  causes  the 
compiler  to  ask  the  link  program  to 
get  the  function  from  the  library 
and  include  it  in  your  program.  The 
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advantage  is  that  you  don't  have  to 
use  the  C  compiler  or  libraries  each 
time  you  run  the  program.  The  li- 
brary function  becomes  as  much  a 
part  of  your  program  as  the  func- 
tions you  write  and  compile. 

C  assignment  statements  are 
very  much  like  BASIC  assignment 
statements.  All  you  need  to  do  is 
omit  the  line  number,  change  the 
letters  to  lowercase,  and  add  a 
semicolon. 

if  Statement 

The  C  if  statement  never  needs  a 
"then"  and  cannot  transfer  control 
to  another  part  of  the  program.  It 
uses  parentheses  around  the  rela- 
tional or  logical  expression.  Other- 
wise, it  is  the  BASIC  IF  in  lowercase 
letters  and  ending  with  a  semico- 
lon. Here's  an  example  in  BASIC; 

450  IF  YEAR  MOD  4  THEN  FEB  =  28 
ELSE  FEB  =  29 

In  C,  you'll  need  four  state- 
ments: 

If  (year  %  4) 

fe"b  =  S8; 
else 

fe^b  =  29; 

Both  versions  use  modulo  divi- 
sion to  identify  leap  years.  The  per- 
cent sign  {%)  is  the  modulo  division 
operator  in  C.  When  the  result  is 
not  zero,  the  variable  feb  is  set  to  28. 
When  the  result  is  zero,  feb  is  set  to 
29.  Like  BASIC,  C  considers  a  zero 
value  as  false  and  a  nonzero  value 
as  true.  C  replaces  the  BASIC 
THEN  by  using  parentheses.  What- 
ever comes  after  the  closing  paren- 
theses is  considered  to  be  the 
statement  to  be  executed  if  the  ex- 
pression is  true.  Now  for  the  bad 
news.  C  has  no  equivalent  for  this 
BASIC  statement: 

500  IF  YEAR  <  1984  THEN  600  ELSE  650 

But  the  news  is  really  not  that 
bad,  because  C  has  a  better  way  to 
do  the  same  thing.  In  BASIC,  line 
600  and  lines  following  are  state- 
ments to  be  executed  for  years  prior 
to  1984.  Lines  650  and  following 
are  statements  that  apply  to  subse- 
quent years.  In  C,  you  can  put  those 
statements  right  in  the  if  statement: 

if  (year  <  1984)  { 
rate  =  .SS; 
base  =  3500; 
surcharge  =  ,50; 

} 
else  { 

rate  =  .26; 
base  =  2000; 


surcharge  =  .58; 
} 

Whatever  it  is,  it  went  up  in 
1984.  The  important  thing  to  notice 
is  the  left  brace  following  the  pa- 
renthesis. This  brace  is  the  begin- 
ning of  a  compound  statement,  or 
block,  that  is  executed  for  years  pri- 
or to  1984.  The  right  brace  ends  the 
block.  All  the  statements  you  need 
for  years  prior  to  1984  go  right  here 
instead  of  somewhere  else  in  your 
program.  Similarly,  a  block  follow- 
ing else  contains  the  statements  for 
years  1984  and  later — all  right  here 
together,  where  you  can't  miss 
them. 

In  BASIC,  you  can  leave  off  the 
ELSE  when  you  don't  need  it: 

400  IF  YEAR  >  1983  THEN  RATE  = 
RATE  +  .01:BASE 
=  BASE  -  500:  SURCHARGE  = 
SURCHARGE  +  .02 

You  can  in  C,  too: 

if  (jear  >  1983)  { 

rata  =  rate  -I-  .01; 

base  =  base  —  500; 

surcharge  —  surcharge  +  .02; 

} 
You  would  have  to  set  rate, 
base,  and  surcharge  to  the  values 
that  apply  before  1984,  or  this 
statement  would  not  give  you  the 
same  answer.  If  you  set  the  vari- 
ables to  the  1983  values  (with  as- 
signment statements),  this 
statement  is  more  efficient  in  either 
language.  In  either  version,  the 
statement  does  nothing  if  the  year 
is  1983  or  earlier. 

C's  if  statement  works  like  BA- 
SIC'S IF  statement,  and  it  can  make 
your  program  more  readable  by  in- 
cluding blocks  of  statements  that 
otherwise  would  be  in  some  other 
part  of  the  program. 

for  Loop 

C's  for  loop  is  much  more  versatile 
than  BASIC'S  FOR-NEXT  loop. 

The  BASIC  loop  starts  with  a 
FOR  statement  and  ends  with   a 

NEXT: 

800  SQ  =  1;  ODD  =  1 
810  FOR  R  =  1  TO  15 
820  PRINT  SQ,  R 
830  ODD  =  ODD  +  2 
840  SQ  =  SQ  +  ODD 
850  NEXT  R 

The  C  loop  has  no  need  for 
NEXT: 

sq  =  odd  =  1; 

for  (r  =  1;  r  <=  15;  r  =  r  +  1)  { 

printf("%d        %d\n",s<i,  r); 

odd  =  odd  +  S; 


SQ. 

) 


sq  +  odd; 


Notice  that  the  C  statement 
consists  of  keyword  for  followed  by 
three  expressions  enclosed  in  pa- 
rentheses and  separated  by  semico- 
lons. The  first  expression  initializes 
r;  it  corresponds  to  the  FOR  R  =  1 
portion  of  the  BASIC  statement. 
The  next  expression  is  evaluated 
before  each  repetition  of  the  state- 
ments in  the  loop.  This  corresponds 
to  the  TO  15  portion  of  the  BASIC 
statement.  The  third  expression  is 
executed  for  each  repetihon  of  the 
loop,  after  the  last  statement.  This 
expression  corresponds  to  the  STEP 
1  option  implied  in  the  BASIC 
statement. 

The  loop  itself  is  a  block,  de- 
scribed in  the  section  on  the  if  state- 
ment. The  loop  could  consist  of  a 
single  statement.  The  statements  in 
this  block  print  15  perfect  squares 
and  their  roots  without  multiplying 
or  calling  a  square  root  function. 
How  about  that? 

Whether  the  loop  consists  of  a 
single  statement  or  a  compound 
statement  (block),  no  NEXT  state- 
ment is  needed.  Either  the  semico- 
lon that  ends  the  statement  or  the 
brace  that  encloses  the  block  tells 
the  compiler  what  belongs  in  the 
loop. 

The  for  statement  of  C  does 
not  look  like  the  FOR  statement  of 
BASIC,  but  for  statements  like  the 
one  shown  in  this  section  work  ex- 
actly like  BASIC  FOR-NEXT  loops. 

while  Loop 

The  C  while  loop  is  similar  to  the 
WHILE-WEND  loop  of  BASIC. 
The  C  version  doesn't  need  the 
WEND  statement  for  the  same  rea- 
son that  the  for  loop  does  not  need 
a  NEXT.  Here's  an  example  from 
BASIC: 

250  WHILE  N  <>  21 
260  INPUT  N 

270  N  =  N  -h  5 
280  WEND 

The  C  version  is: 

while  (n  !=  21)  ( 

scanfC"%d",n); 

n  =  a  -1-  6; 

} 
The  while  keyword  is  fol- 
lowed by  an  expression  within  pa- 
rentheses. In  the  example,  the 
expression  is  a  relational  one,  hav- 
ing a  true  value  (1)  or  a  false  value 
(0).  Notice  that  !=  means  not  equal 
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to.  The  expression  could  be  a  nu- 
meric expression;  in  that  case,  it  is 
considered  true  when  its  value  is 
not  equal  to  zero.  A  zero  value  is 
considered  false.  In  either  case,  the 
loop  is  executed  as  long  as  the  ex- 
pression is  true. 

In  the  C  version,  the  state- 
ments of  the  loop  are  enclosed  in 
braces  and  include  the  scanf( ) 
function  to  accept  a  decimal  num- 
ber that  you  type  in.  These  state- 
ments are  executed  until  the  user 
types  21;  then  the  loop  terminates. 
In  either  language,  it  could  happen 
that  typing  21  would  not  get  you 
out  of  the  loop.  This  would  happen 
if  variable  it  were  a  real  number 
type  and  the  automatic  type  con- 
versions introduced  a  fractional  re- 
sult (21.00001,  for  example). 
Declare  n  as  an  integer  to  avoid  this 
problem. 

Notice  the  contrast  between 
for  and  while  loops.  The  for  loop 
initializes,  tests,  and  increments. 
The  while  loop  only  tests.  The  loop 
must  include  some  way  for  the  vari- 
able to  acquire  the  value  required 
for  the  test.  Otherwise,  the  loop  is 
repeated  until  you  get  tired  of  it  and 
turn  off  your  computer.  Here's  the 
while  loop  version  of  the  for  loop 
example: 

r  =  sq  =  odd  =  1; 
■while  (r  <=  15)  [ 

prlntf("%d       %d\n.",sq,  r); 

odd  =  odd  +  2; 

sq  =  sq.  -(-  odd; 

r  ~  r  +  1; 

} 
The  initialization  expression 
moved  to  the  statement  preceding 
the  loop,  the  incrementing  expres- 
sion moved  into  the  loop,  and  the 
keyword  changed.  Otherwise,  the 
examples  are  identical. 

goto  Statement 

BASIC'S  GOTO  statement  allows 
you  to  write  unmanageable  pro- 
grams, yet  it  is  unavoidable  in 
many  BASIC  programs.  C's  goto 
statement  is  seldom  required.  You 
should  avoid  using  the  goto  state- 
ment to  keep  your  programs  under- 
standable. 

Here's  the  culprit  in  BASIC: 
400  GOTO  450 

In  C; 
goto  there; 

Since  C  has  no  line  numbers, 
the  goto  statement  has  to  be  differ- 


ent, but  it  works  the  same.  How- 
ever, the  program  must  include  a 
statement  with  "there"  as  its  label: 

thereiyear  =  year  +  1;  /•  You  may 
label  any  statement  */ 

Leave  the  goto  statement  for 
use  only  in  dire  emergencies. 

A  Program  Example 

You  can  program  solutions  for 
many  problems  using  only  these 
statements  along  with  input/out- 
put functions.  Program  1  demon- 
strates this  with  a  very  simple 
checkbook  balancer. 

Notice  the  first  line  of  the  pro- 
gram. It  is  a  compiler  control  line, 
required  for  the  input/output  state- 
ments in  the  example.  The  number 
sign  (#}  of  a  compiler  control  line 
must  be  in  column  1  of  the  line,  the 
leftmost  character  position. 

The  input/output  functions  re- 
quired are  printf(  ),  which  displays 
prompting  messages  on  the  screen, 
scanf( ),  which  accepts  the  numbers 
you  type  in,  and  getche( ),  which 
accepts  a  single  character  from  the 
keyboard  and  displays  it  on  the 
screen.  The  other  executable  state- 
ments, except  return,  are  all  like 
BASIC  statements.  The  return 
statement  just  returns  control  to  the 
operating  system. 

The  program  first  asks  for  the 
balance  and  stores  it  after  you  type 


it  in.  Then  it  asks  if  there  are  any 
outstanding  deposits.  Using  the  fa- 
miliar if  statement  and  the  charac- 
ter input  function,  the  program 
accepts  the  first  character  you  type 
and  requests  a  deposit  amount  if 
you  have  typed  Y.  After  displaying 
the  prompting  message,  the  pro- 
gram stores  the  deposit  value  and 
enters  a  while  loop.  Until  you  type 
0  for  the  deposit  amount,  the  loop  is 
repeated,  adding  the  deposit  to  the 
balance  and  getting  another  deposit 
value. 

When  you  type  any  letter  other 
than  Y  (and  that  includes  y),  the 
program  skips  to  process  the 
checks,  subtracting  each  check  from 
the  previous  balance.  When  you 
type  0  (for  no  more  checks),  the 
program  displays  the  balance. 

The  program  is  not  very  user- 
friendly,  because  it  skips  the  pro- 
cessing of  deposits  if  you  type  any 
letter  but  Y.  It  should  at  least  recog- 
nize y.  It  could  reject  all  letters  but 
Y,  y,  N,  and  n,  telling  you  to  try 
again. 

This  program  shows  that  it's 
possible  to  program  solutions  to 
common  problems  using  only  the 
statements  described  in  this  article. 
But  you  can  do  a  lot  more  with  C: 
things  that  are  done  differently 
from  BASIC  and  things  you  cannot 
do  in  BASIC. 


Program  1 :  Checkbook  In  C 

^include  <stiiio,h> 

main  ()  /*  Balance  your  oheckboolc?  7 

{ 

double  bal,  ohk,  dep; 

char  in[12]; 

int  c; 

printfC'Type  in  statement  balance:");  /*  Display  function  •/ 
3cani'C"%lf',  &bal);  /*  Formatted  input  function  */ 
printf("Any  outstanding  deposits?  (Y  or  H)  "); 
if  ((c  =  getoheO)  = ""  'Y')  {  /*  Character  input  function  7 
printf ("  \ nType  outstanding  deposit;  S"); 
acanf("%lf",  &dep); 
while  (dep  >  0)  { 
bal  =  bal  -I-  dep; 

printfC'Type  outstanding  deposit:  8"); 
SCanf("%lf',  Stdep); 


printf("\ nType  outstanding  check:  S"); 
scanfC'%lf",  icohk); 
while  (chk  >  0)  { 

bal  =  bal  -  chk; 

printfC'Type  outstanding  check:  $"); 

scanf("%lf',  &chk); 

printf C Your  checkbook  balance  should  be  $%.21f',bal); 
return; 
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News  &  Products 


Hard  Disk  For  Atari  ST 

Hard  disks  for  the  Atari  520ST  and 
1040ST  in  10-,  20-,  30,  and  60- 
megabyte  configurations  have  been  in- 
troduced by  Supra  Corporation.  The 
SupraDrive  system  connects  to  the 
computer's  high-speed  DMA  port  and 
can  significantly  improve  disk  transfer 
speeds.  The  drive  is  compatible  with 
TOS  and  will  work  with  other  standard 
DMA  bus  peripherals.  The  ST  can  be 
booted  directly  from  the  hard  disk. 

The  SupraDrive  system,  which 
ranges  in  price  from  $799  for  the  10  mb 
system  to  $1,995  for  the  60  mb  unit 
includes  format,  backup,  and  partition 
utilities  that  allow  the  user  to  created  up 
to  four  separate  logical  drives  for  file 
storage. 

Supra  Corporation,  lJ3i  Commercial 
Way,  Albany,  OR  97321. 
Circle  Reader  Service  Number  218. 


Supra's  hard  disk  for  the  Atari  ST  is 
available  in  four  sizes. 


New  Tools  For  Amiga 

Brown-Wagh  Publishing  has  released 
three  new  productivity  tools  for  the 
Amiga,  designed  by  Micro-Systems 
Software  Inc.  of  Florida. 

A}:ali/ze!  is  a  spreadsheet  program 
that  can  be  used  for  financial  analysis 
and  planning,  bookkeeping,  home  bud- 
gets, check  registers,  and  professional- 
sized  spreadsheets. 


Using  OnLitie!,  a  telecommunica- 
tions program,  you  can  link  up  with 
commercial  information  services,  send 
Telex  messages  and  electronic  mail,  and 
exchange  data  with  other  computers. 
This  program  comes  equipped  with 
user-defined  macrokeys  to  transmit  fre- 
quently used  commands  and  script  files 
for  automated  operation. 

The  electronic  bulletin  board  sys- 
tem, BBS-PC,  interfaces  to  a  hard  disk 
and  a  2400  bps  modem.  It  enables  other 
users  to  call  your  Amiga  and  read  mes- 
sages, leave  you  messages,  send  you  a 
file,  or  take  a  file  you  have  left  for  them. 
BBS-PC  works  in  the  background  so  the 
Amiga  can  answer  the  phone  while  other 
users  are  working  on  their  projects. 

Analyze!  and  BBS-PC  retail  for 
$99.95,  and  Online!  retails  for  $69.95. 

Brown-Wagh  Publisliing,  100  Verona 
Ct.,  Los  Gatos,  CA  95030. 
Circle  Reader  Service  Number  219. 


ST  Graphic  Arts 

Progressive  Computer  Applications, 
Inc.,  has  announced  The  Graphic  Artist, 
a  graphic  arts  package  for  the  Atari  ST. 
This  software  package  combines  com- 
puter-aided design,  typesetting, 
spreadsheet,  and  word  processing  ca- 
pabilities for  use  with  the  color  graphics 
features  of  the  ST. 

The  Graphic  Artist  language  FiG- 
GAL  is  an  auxiliary  package  which  al- 
lows the  user  to  create  complex  custom 
applications  for  The  Graphic  Artist.  It 
offers  if-then  logic,  branching,  looping, 
and  variables. 

Suggested  retail  price  for  The 
Graphic  Artist  is  $495.00,  and  $245.00 
for  The  Graphic  Artist  language. 

Progressive  Computer  Applications, 
Inc.,  2002  McAuliffe  Dr.,  Rockville,  MD 
20851. 
Circle  Reader  Service  Number  220. 


Adventure  Game  New  For 
The  Mac,  ST 

Search  Transylvania  for  Princess  Sa- 
brina  with  Penguin  Software's  graphic 
adventure  game  Transylvania  in  a  new 
Macintosh  version,  You  must  look 
through  the  forest  and  castle,  encounter 
creatures,  and  put  the  clues  together  in 


order  to  find  and  rescue  the  princess, 
Transylvania  now  uses  the  new 
Comprehend  advanced  parser — the  por- 
tion of  the  adventure  that  analyzes  your 
commands — as  well  as  colorful  graph- 
ics. It  is  also  available  for  the  Atari  ST, 
Apple  II  {64K  required),  and  Commo- 
dore 64. 

The  Macintosh  version  retails  for 
$39.95. 

Penquin  Software,  830  Fourth  Ave., 
P.O.  Box  311,  Geneva,  IL  60334. 
Circle  Reader  Service  Number  221. 


Educational  Software 

Learning  Technologies  has  released  ten 
educational  software  packages  for  pre- 
kindergarten  through  grade  six.  All 
software  is  compatible  with  the  Apple 
Il-series  and  Commodore  64  and  128. 

For  preschool  through  grade  two: 

Animal  Hotel  develops  specific  re- 
call, visual  memory,  visual  discrimina- 
tion, and  analysis  of  the  whole. 

Bike  Hike  develops  specific  recall 
and  visual  memory,  number  recognition, 
and  counting  and  visual  discrimination. 

lion's  Workshop  also  develops 
skills  in  visual  discrimination  as  well  as 
pattern  recognition  and  analysis  of 
part-whole  relationships. 

Visual  discrimination,  matching, 
observation,  and  deductive  reasoning 
skills  are  developed  in  Same  or  Different. 

Both  Shuttcrbug's  Pictures  and 
Shutterbug's  Patterns  develop  skills  in 
visual  discrimination  and  analysis  of 
part-whole  relationships,  while  Pal- 
terns  adds  pattern  recognition. 

For  ages  eight  and  above: 

Number  Please  develops  specific  re- 
call and  sequential  memory. 

Thinking  skills  such  as  observing 
details,  comparing  and  contrasting, 
classifying,  defining  a  problem,  deter- 
mining a  solution,  and  evaluating  out- 
comes are  developed  in  Gremlin  Hunt. 

Pipeline  teaches  such  thinking 
skills  as  defining  a  problem,  experi- 
menting with  possible  solutions,  evalu- 
ating outcomes,  recognizing  patterns, 
and  determining  part-whole  relation- 
ships. 

For  math  instruction  for  preschool 
through  sixth  grade: 
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THE  EPSON  LIBRARY  FROM  MERDYNE  PUBLISHERS 

EPSON 

CONNECTION: 

ATARI 


It's  time  to  use  your  ATARI  800XL 
for  more  than  playing  games, 
Manage  your  tiousehoid,  succeed  in 
school,  do  reports  for  work.  This  book 
shows  you  how.     (L.E.  Zeitz  .  .$16,95) 

ALSO  NEW 
EPSON  Printers:  Tips  &  Secrets 

(Darnall  &  Corner.  . ,  .516.95) 
EPSON  Guide  to  PC  Communications 

(Banse  $16,95) 

LOOK  FOR  THE  EPSON  LIBRARY  AT  YOUR 
EPSON  DEALER.  LOCAL  BOOKSTORE  OR 
YOU  CAN  ORDER  FROM 

I     Merdvne  Publishers,  Inc, 
I   I   llllll     134  Fifth  Ave.,  New  York,  NY  10010 
212/255-8448.  TELEX  MERDYN 


To  receive  additional 
information  from 

advertisers  in  this  issue, 

use  the  handy  reader 

sen^ice  cards  in  the 

bacl<  of  the  magazine. 


/ ^ 

Save  Your  Copies  of  COMPUTE! 

Protect  your  back  Issues 
of  COMPUTE!  in  durable 
binders  ot  library  coses, 
Eacri  binder  or  case  is 
custom-made  in  fiag- 
biue  binding  with  em- 
bossed white  lettering. 
Each  holds  a  year  of 
COMPUTE!.  Order  several 
and  keep  your  issues  of 

COMPUTE!  neatly  organized  for  quick  reference, 

(These  binders  make  great  gifts,  too!) 

Cases:  Binders 

S6.95  each,  $8,50  each; 

3  for  $20,00;  3  for  $24,75; 

6  for  $36.00  6  for  $48.00 

(Please  add  $2,50  per  unit  for  orders  outside  the  U.S.) 
Send  in  your  prepaid  order  with  the  attached  coupon 

Mail  to:  Jesse  Jones  Industries, P.O.  Box  5120, 

Dept.  Code  COTE, Philadelphia,  PA  19141 

Pleose  send  me COMPUTE!  D  cases  D  binders. 

Enclosed  is  my  check  or  money  order  for  $ . 

(U.S.  funds  only,) 

Name 


Address . 
City 


State „ — . 

Sclisfoction  guaronteed  or  rr^oney  returided 
Please  oilow  A-O  weeks  for  delivery. 


Zip. 


THE  AMAZING  VOICE  MASTER® 

Speech  and  Music  Processor 

^   Your  computer  can  talk  in  your  own 
voice.  Not  a  synthesizer  but  a  true  digitizer 
that  records  your  natural  voice  quality — and  in 
any  language  or  accent.  Words  and  phrases  can 
be  expanded  without  limit  from  disk. 

^  And  it  will  understand  what  you  say.  a 

^^    real  word  recognizer  for  groups  of  32  words  or 
phrases  with  unlimited  expansion  from  disk 
memory.  Now  you  can  have  a  two  way  conver- 
sation with  your  computer! 

^  Easy  for  the  beginning  programmer 

with  new  BASIC  commands,  fvlachine  language 
programs  and  memory  locations  for  the  more 
experienced  software  author, 

^   Exciting  Music  Bonus  lets  you  hum  or 
^^    whistle  to  write  and  perform.  Notes  literally 

scroll  by  as  you  hum!  Your  composition  can  be 
edited,  saved,  and  printed  out.  You  don't  have  to 
l<now  one  note  from  another  in  order  to  write 
and  compose! 

Based  upon  new  technologies  invented  by  COVOX,  One  low 
price  buys  you  the  complete  system— even  a  voice  controlled 
black-jack  game!  In  addition,  you  will  receive  a  subscription  to 
COVOX  NEWS,  a  periodic  newsletter  about  speech  technology, 
applications,  new  products,  up-dates,  and  user  contributions. 
You  will  never  find  a  batter  value  lor  your  computer, 

VJIM  LY    tpoSViwd  includes  all  hardware  and  software. 

For  telephone  demonstration  or  additional   information,  call 
(503)  342-1271.  FREE  audio  demo  tape  and  brochure  available. 
Available  from  your  dealer  or  by  mail.  When  ordering  by  mail  add  $4,00 
shipping  and  handling  (S10,00  for  foreign,  56,00  Canada), 

The  Voice  Master  Is  available  for  the  064, 0126,  all  Apple  ll's,  and  Atari 
800,  BOOXL  and  130XE.  Specify  model  when  ordering. 


For  Faster  Service  on  Credit  Card  Orders  only: 


ORDER  TOLL  FREE  1-800-523-9230 


675-D  Conger  Street,  Eugene,  OR  97402 

Telex  706017  (AV  ALARM  UD) 


Math  in  a  Nutshell  helps  users  de- 
velop skills  in  counting,  addition,  sub- 
traction, multiplication,  and  division  of 
single-digit  numbers. 

Each  program  retails  for  $19.95 
and  includes  a  redemption  card  for  a 
free  Learning  Kit.  The  Learning  Kit  in- 
cludes a  color  poster,  a  custom  lesson 
plan,  worksheets,  a  progress  chart,  and 
award  certificates. 

Learning   Technologies,    4255   LB/, 
Suite  265,  Dallas,  TX  75244. 
Circle  Reader  Service  Number  222. 


In  Pursuit  Of  Computer  Trivia 

King  Chip,  from  XYLYX  Computer  En- 
tertainment Limited,  is  a  board  game 
designed  to  test  your  knowledge  in 
many  areas  of  the  computer  industry. 
Similar  to  Trivial  Pursuit  in  format,  it 
contains  more  than  4,000  questions  in 
six  categories:  data  communications, 
history  and  current  events,  hardware, 
jargon,  and  acronyms,  potpourri,  and 
software.  Questions  in  each  category 
can  be  selected  from  five  levels  of  diffi- 
culty, and  vary  in  format  among  multi- 
ple choice,  fill-in-the  blank,  true  or 
false,  and  one-  or  two-word  answers. 

The  object  of  the  game  is  to  answer 
enough  questions  correctly  so  that  you 
can  attain  the  throne  of  King  Chip. 
Once  there,  you'll  have  to  keep  answer- 
ing correctly  to  maintain  it. 

What  sets  King  Chip  apart  from 
many  other  trivia-type  games  is  its 
depth  of  responses.  The  back  of  each 
question  card  contains  not  only  each 
correct  answer  but,  where  appropriate, 


an  explanation  of  the  answer.  So  it's  a 
bit  of  a  tutorial  as  well  as  just  a  game. 

King  Chip  retails  for  $39.95. 

XYLYX  Computer  Entertainment  Lim- 
ited, 20  Torbay  Rd.,  Markham,  Ontario, 
Canada  L3R  1G6. 
Circle  Reader  Service  Number  223, 


Apple  11,  Commodore,  IBM 

Teiecommunieations 

Pacicage 

The  Information  Connection,  from  Gro- 
lier  Electronic  Publishing,  combines  a 
telecommunications  program,  text  edi- 
tor, and  tutorial  software  on  one  disk 
for  the  Apple  Il-series,  IBM  PC  or  PCjr, 
and  Commodore  64  or  128  in  64  mode. 
This  package  for  beginners  teaches  the 
fundamentals  of  telecommunications 
and  features  a  simulated  on-line  prac- 
tice session.  There  is  also  an  alarm  and 
automatic  shut-off  to  help  control  tele- 
communications costs. 

Apple  and  IBM  versions  retail  for 
$59.95  and  the  Commodore  64  version 
costs  $39.95. 

Grolier  Electronic  Publishing,  Inc., 
95  Madison  Ave.,  Neiu  York,  NY  10016. 
Circle  Reader  Service  Number  224. 


World  Series  Baseball 

Manage  your  own  baseball  team  and 
play  the  team  of  your  choice  with  The 
World's  Greatest  Baseball  Gatne  from 
Epyx,  an  upgraded  version  of  the  popu- 
lar original.  This  strategy  game  features 
over  75  teams,  complete  rosters  for  the 
1984  and  1985  seasons,  statistics  from 


King  Chip  rs  a  trivia  game  that  tests  your  knowledge  of  computers  and  computing- 
it's  a  computer  game  that  doesn't  require  a  computer. 


actual  All  Star  and  World  Series  teams, 
the  ability  to  trade  players,  and  a  score- 
board that  asks  baseball  trivia  questions. 

Users  can  custom-design  their  own 
teams  by  picking  lineups  from  actual 
major  league  baseball  rosters,  and  then 
challenge  the  team  of  their  choice  in  a 
championship  game. 

For  the  Commodore  64/128,  Ap- 
ple Il-series,  and  IBM  at  prices  ranging 
from  $24.95  to  $34.95. 

Epyx  Computer  Software,  Inc.,  Sun- 
nyvale, CA  94089. 
Circle  Reader  Service  Number  225. 


Two  New  Teachirrg  Aids 

Gamco  Industries,  Inc.  has  released  two 
new  software  packages  to  help  teachers 
explain  calendars  and  simple  geometry. 
Both  packages  hold  up  to  200  student 
files  which  automatically  record  each 
student's  records. 

Calendar  helps  students  learn  the 
days  and  months;  seasons,  special  days, 
and  holidays;  and  how  to  use  a  calendar. 

Perimeter,  Area,  &  Volume  offers 
simple  geometry  formulas  and  practice 
in  using  them.  There  are  several  levels 
in  each  lesson. 

In  either  package,  when  the  stu- 
dent achieves  a  certain  score,  he  or  she 
may  play  an  arcade-style  game  as  a 
reward. 

Calendar  and  Perimeter,  Area,  & 
Volume  are  available  for  $39.95  each  for 
the  Apple  Il-series  and  the  Commodore 
64. 

Gamco  Industries,  Inc.,  Box  1911,  Big 
Spring,  TX  79721. 
Circle  Reader  Service  Number  226. 


Simple  Graphics  Program 

The  Graphics  Magician  Junior  from  Po- 
larware  is  a  graphics  program  for  nov- 
ice computer  artists  using  Apple  II 
computers.  It  utilizes  108  colors  and 
patterns  with  a  wide  variety  of  com- 
puter "brushes."  Pictures  can  then  be 
saved  to  disk  or  printed  out. 

Polarware  is  a  division  of  Penguin 
software. 

Retail  price  is  $34.95, 

Polarware,  2600  Keslingcr  Rd.,  P.O. 
Box  311,  Geneva,  IL  60134. 
Circle  Reader  Service  Number  227. 

Apple  Graphics  Utilities 

Dark  Star  Systems  has  designed  two 
printing  utilities  for  Apple  II  computers. 
MousePrintz  lets  MousePrint  users 
print  their  pictures  directly  to  an  Epson 
or  other  non-Apple  dot-matrix  printer, 
plus  offers  a  menu  of  screen-editing 
features,  including  full-screen  viewing, 
inversion,  mirror  image,  and  cropping; 
rotation,  shading,  chart  recording,  and 
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ATARI 
30XE 

ATARI  ISOXESuptr 

Compultr  PKkige 

130XE  Computer 

1050  Disk  Drive 

1027  Printer 

Atflriwriter  « 

Can  lor  Indlvldud  » 

tupttr  package  price 

ATARI  PRINTER 

INTERFACES 

Uprinl  A 54.95 

UprinlAW/l6K...  79.95 
Uprim  AW/MK  . .  .99.95 

MPP1150   5995 

INDUS  QT 

DISK  DRIVE... Call 

ATARI  1  30XC  SUPER 
PRIHTIR  PKOS. 

SG-10  Primer 

and  U-Print  A  . ,  .  275 
Panasonic  1091 

and  U-PrinI  A  ...  309 
Super  Printer  Packages 
have  r}0  extra  shipping 
charges  or  credit  card 
surcharges  when  sriip- 
petl  in  Continental  USA 

ATAR1 1 30XE 
SOFTWARE 

BRODERBUNQ 

PiinlShop 28.95 

Karaleka ffl.95 

Pnnl  Shop 
Graph  I.  II.  or  III . , ,  19.95 

Print  Shop  Comp 27.95 

INFOCQM 

See  CommaJcrg  64  sec- 
tion tar  Items  and  prices 

ELECTRONIC  ARTS 

Archon  II 21  96 

Afchon  16.95 

Seven Cit  ofGolD  ...  21.95 

Skytox 24.95 

Pinball  Const 16.95 

One  on  One 21.95 

M1CR0PR0SE 

Sileni  Service 23,95 

Gunship 2395 

Accrojel 23  95 

F-15  Sirike  Eagle  ....  2395 
Kennedy  Approach  . .  23.95 
OSS 

Basic  XE-Can 5a95 

MAC  55  XL-Can <I9  95 

Action-Cart 49,95 

Basic  XL-Can 39,ffi 

Ail  Tool  Kits  20  95 

BATTERIES  IHCLUOED 

HomePak 34,95 

Paperclip 39.95 

B-Brapli 34.95 

SYNAPSE 

Syncalc 32.95 

Synfile 32.95 

Syntrend 25.96 

Syncalc  Templates , , .  16.95 
Loderunner  Rescue 
^^indwheel  ...,.-. 

Essen .  - 

Brimstone .., 

SSI 

Soe  CommociQf9  64  sec- 
tion tor  Hems  smt  prices 

MISCELLANEOUS  I30XE 

Hacker 1995 

Amer.  Cross  Ctry  . . .  19.95 
Plighl  Simulator  II  ...  34  95 

Ultima  II  37,95 

Ultima  III 37.95 

Universe 69.95 

Letter  Pertecl 39.96 

Data  Penect 39,95 

<Halley  Project 27,95 

lUltimal 23,95 

Ultima  IV 41,95 

MMG  Basic  Comp. . . .  69.96 


.2095 
.27  95 
.27,95 
.27.95 


ATARI 
520ST* 

Atari  520ST- 

RGB  Syllem...Call 
Atari  520ST-Mono- 
chroma  Syi. .  .Call 
SF314DS/DD 
1  Megabyte  DIak 

Drive Call 

We  warranty  all 
520ST  computers 
purchased  from 
CompuiAbilily  lor 

nirtety  days. 
'Please  call  for 
slock  availability 

on  Atari  ST 
products  before 
ordering  by  mail. 

MISCELLANEOUS  ST 

VIP  Prolessional , .  .  12995 

Ullimall  3995 

Perry  Mason 34  95 

Degas  2795 

Farentieit  451  34.95 

Amazon 34  95 

Hacker 29.95 

THe  Rnal  Woril 94.95 

Deja  Vu 39.95 

PC/Intercom 89.96 

Hex  27.96 

Crimson  Crown 27,95 

Wuilpies  23,95 

King's  Quest  II  34,95 

Gate 34  95 

Borrowed  Time 34.95 

Personal  Prolo} 79  95 

Personal  Pascal 64  95 

Zoomracks 59  95 

Mi-Term 5495 

Regeni  WOfd 34  95 

Sundog 2795 

Regeni  Spell 34  95 

Winnie/Pooh 1995 

Isgur  Porttolio  Call 

Michlron  Utilities  ....  4195 

Music  Studio  Call 

Silent  Service Call 

INFOCOM  ST 

Deadline  34  95 

Siarooss  34  95 

2ork  I.  II.  or  III 2995 

Witness 27  95 

Suspended 34  95 

Planetfall 2795 

Sorcerer 29.95 

Seastalker  27,95 

Cutthroals 27,96 

Hitchiker 27 ,» 

Suspect, 29,95 

Wishbrineer 27  95 

Intidet  29,95 

Enchanter 27,95 

Spellhreaker 34.95 

Mind  Forever  Voy 34.95 

AMIGA 

Call  lor  H*i-dwart  and 
add-on  pedpheraJt  prictf 

AMIGA  SOin^ARE 

Hacker 2995 

Mindshadow 29,95 

Archon  27  95 

VlPProlessional....  13995 

Maxicom , 3995 

Maxidesk  49,95 

Maxiplan 119,95 

One  on  One 29.95 

7  Cities;  Gold 29.95 

Skylox 29.95 

Marble  Madness 29.96 

fleturn/Atlantis 29.96 

Archon  29.95 

Deluxe  Paint 59.95 

Borrowed  Time 29.95 

Inlocom. . , Call 

Fin.  Cookbook 34.95 


P.O.  Box  17B82,  Milwaukee,  Wl  53217 

ORDER  LINES  OPEN 

Mon-Frt  11  a.m.  -  7  p,m  CST  •  Sat,  12  p.m.  -  5  p.m.  GST 


APPLE 

PRACTICAL  PERIPHERALS 

We  carry  the  complete  line  of  products 

Call  for  Current  Prices 

APPLE  PRINTER 

INTERFACES  AND  BOARDS 

Apricorn  Parallel  w/Graptiics 69.95 

Apficorn  16K  Expansion  Board    .  .  .   82.95 

Apficorn  80  Column  Board 64.95 

Apricorn  RS232  Interlace 69.95 

U-Print-Apple  IIC  W/64K 109.95 

U-Print-Apple  IIC  w/16K 89.95 

APPLE  SOFTWARE 


BRODERBUND 

Prim  Shop  33  95 

Print  Shop  Graphics 

I,  li.  or  III 17  95 

Print  Shop  Comp 27  95 

KaratBka  21,95 

Carmen  Sandiego 25.95 

Science  Tool  Kit 39.95 

Bank  Strcel  Writer  ..  ,4495 

Faniavision 2795 

ELECTflONIC  ARTS 

Adventure  Const 3495 

Archon  II   27  95 

Bards  Tale 29,95 

Imajic  Football  24,95 

Auto-Duel 34  95 

SkyloJ 27  95 

Lords ol Conquest  ..,27  95 

One  on  One. 27,95 

Ultima  III 3995 

Ultima  IV  3995 

Moeblus 3995 

Eprx 

Ballblazer 24.95 

Winter  Games 24,95 

Summer  Games  II 2495 

V*orlds  Great/ 

Football  2495 

Eidolon 24  95 

Apshai  Trilogy 24  95 

KotcnisRift 24  96 

INFOCOM 

See  Atari  520ST section  tar 
iioms  and  pfices. 

MICROPROSE 

SeeAtari  t30XE  section  lor 
Items  antf  prices. 
MINDSCAPE 

Color  Me 2t)95 

Crossword  Magic 34,95 

Halley  Project 29,96 

A  Vie*  To  Kill 27,95 

Racier 2995 

The  Wist 27  95 

Ptrfed  Score 4995 

Voodoo  Island  27,95 

Rambo 2795 

American  Challenge  . .  Call 
Goldfinger Call 


SIMON  &  SCHUSTER 

Typing  Tutor  III 3495 

KobiashiAdv 29.95 

Webster  Spell  Chk  ...39.95 
Webster  Thesaurus ...  84.95 
LovBJoy  SAT 49.95 

SIB-TECH 

Wizardry(0iam    2395 

Wizardry/Legacy  ...27  95 
Wizardry/Proving  ...33  95 
Wizardry/WeiniJa  . .  ,29  95 

Wiziprint 1995 

SSI 

See  Commodore  64 sec- 
tion for  Hems  &  prices. 
APPLE  MISCELLANEOUS 

Beachead 23,95 

Beacheadll 2395 

Gamemaker 27  95 

Hacker 27  95 

Hardball 24  95 

SundOQ 2795 

Star  League  Base,  ...23,95 
Microleague  Base   ...2995 

PFS  Sollware Call 

Newsroom 3995 

Clip  Alt  Vol  I 2095 

Gato 2796 

SupeiDase B995 

Comp  Gardening]  ....39  95 

Kings  Ouesi  II 34  95 

Dambusters 27  95 

Alternate  Reality  ,..,27  95 

Prince 47  95 

Movie  Maker  39.95 

Zoif  0 27  96 

Gaonies  27.95 

Commando 2595 

Kung  Fu  Master 2595 

Karate  Champ  25.95 

Hulk 24.95 

The  Hotibit 24.95 

Strip  Poker 2395 

Pimt 3495 

Blazzing Paddles  .,..3495 

Beagle  Bros Call 

Math  Blaster 34  95 

Fight  Night 27  95 


We  stock  hundreds  of  v 
programs  for  the  Apple, 
Atari,  C-64and  IBM. 
If  you  don't  see  it  listed  here, 
jjon't  hesitate  to  cal 

NO  SURCHARGE 
FOR 


MASTERCARD 
AND  VISA 

-EST.  1982- 


COMMODORE 
126 

C-12B  Computer 
1571  Disk  Drive 
1902  Monitor  .  , 
1670  Modem    .  , 


Call 
Call 
Call 
Call 


IBM  PC 

IBM  PC  SYSTEMS 

Configured  to  your 

specitic  needs 

Call  lor  lowBit  price  on 

IBM-PC,  laM'XT 

or  IBM-AT 

Corona  PC-400 

Compatible  . .  Call 

Corona  Portable  PC 

Compatible  . .  Call 

PC  Multifunction 

Boards 

We  carry  (he 

complete  line  o* 

AST,  Hercules, 

Paradise,  STB, 

and  Quadram 

Call  for  current 

prices 
IBIH  PC  SOFTWARE 

Print  Shop,   - 39  95 

Pnnl  Shop  Graph  I  , .  27  95 

Bank  Slieel  Writer.  -  49  95 

Ancient  Art  of  War  ,.  29.95 

BORLAND 

Sidekick 37  95 

Turbo  Pascal  49  95 

BLUE  CHIP 

Saron  34  95 

Sguire 34  95 

Millionaire  34  95 

Tycoon  34  95 

DIGITAL  RESEARCH 

Calf  lar  ilams  and  prices. 

INFOCOM 

See  Alan  S!OS  T  for  Hems 
and  prices 

LEADING  EDGE 

Nulshell  6995 

LE/WP  Basic 6795 

LE/Word  Proc 
^Speller 169.95 

MICROPROSE 

F-15  strike  Eagle....  2395 
Kennedy  Approach  . .  27,95 

Aerojet  27,95 

Silent  Service 2795 

MICROSOFT 

Flight  Simulator 38,95 

Word 249  00 

Mulliplan  134  95 

MINDSCAPE 
See  Apple  Section  lor 
ilams  anti  prices. 

SIERRA 

King's  (Xiest 3495 

Kings  liiest  II  3495 

Ullimall  3995 

THOUGHTWARE 

Caif  to'  Hems  snd  prices. 

IBM  MISCELUNEOUS 

PfS Call 

Gato 27,95 

Wizardry 3995 

Strip  Poker 27,95 

Electric  Desk  204  96 

D-Baseili  Call 

Sideways 39  95 

Home  Pak 34,95 

Saioonltl  34  95 

Peactitree Call 

Jet 34  95 

BPI  Business Call 

Newsroom  39,95 


COMMODORE 
128  SOFTWARE 

Multiplan64/12a.    44  95 

Consultant 

Paper  Clip  'Speti 

:iwi1tcalc 

Wordivnter  .... 
Dala  Manager  . 
Fleet  System  II  . 
Superbase  128  . 
Mach  V/126  ... 


52  95 
54  95 
49  95 
49  95 
49  35 
44  95 
69  95 
34  95 


COMMODORE 
64 

C-64  Computer . .  Call 
1541  Disk  Drive. .  Call 
1660  Modem  ...  49,95 
1670  Modem 169 

C.e4  SUPER 
PRtNTER  PKGS. 

SG-10  &Xetec 
Supergrapti., , 
Panasonic  1091 
&  Xelec 
Supergraph. . . 
Legend  1080 
&  Xetec 
Supergraph. . . 
5iyper  Printer  Paclrages 
have  no  arided  shipping 
or  charge  card 
surcharges  wt}en 

shipped  in 
Continental  USA 


279 


315 


269- 


B.i.  80  Column 
Card  .  .  .  59.95 
While  Supplies  Lait 


Cardco 
G-Wlz 


54.95 


GENERAL 
HARDWARE  I 

Ms 

SG-10  200 

SG-15  369 

SD-10   339 

SD-1S   449 

SR-10 489 

SR-15 Call 

PRINTERS 

Panasonic  1091  245 

Legend  608 169 

Legend  1080 209 

Powerlype  309 

Juki  5510 389 

Epson Call 

Panasonic  1060 215 

PRINTER  BUFFERS 

Microta^er From  559 

y-Bult  I6K 7995 

U-aull64K 9995 

MODEMS 

us  Robotics  2400 469 

Votksi^oCem  1200 189 

Prometneus  1200 319 

Password  1200 209 

Novation Call 

PC  Modems  Call 

MONITORS 

Commodore  1902 Call 

Commodore  1602 169 

SakataSC  lOO 169 

Samsung  ir  Green     7995 
Samsung  irAmb      7995 

Taian Call 

Amdek Call 


To  Order  Call  Toll  Free 

800-558-0003 


COMMODORE  64  SOFTWARE 

ELECTRONIC  ARTS 
Adv  Construction  . .  .2995 
Mail  Order  Monster  ..24  95 
Racing  Destruction  . .  ,24  95 

Ultima  III 37  95 

Jltimaiv  4195 

Bards  rale 2795 

See  Alan  130KE  section  tor 
rest  or  Items  &  prices. 

EPrx 

Eidolon 24  95 

KoronisRifl  2496 

Winter  Games 24  95 

Apshai  frilogy 2495 

Fast  Load-Cart 24  95 

Program/Tool  Kit  ....2995 
MICROPROSE 

See  Atari   130XE  section 
for  items  and  prices. 

MISCELLANEOUS 
COMMODORE  64 

Print  Shop 26,95 

Cat-Kit  3495 

Superbase  64 4795 

Karateka  2095 

Hacker 20,95 

Gamemaker 27,95 

Ulbmall 3795 

Karate  Champ  2595 

Essex 27,95 

Kung  Fu/ 

Kung  Fu  Master 25,95 

9  Pnnces  ol  Amb*r  ...2295 
Spyvs  Spy  Vol  II  ...2395 

MaxiGoll 24.95 

Inleinafl Hockey  ....19.95 

The  Founb  Proto  23.96 

Blaring  Paddles 24.95 

Mirage  Word  34.95 

Mirage  Database 34.95 

Welcome  Aboard 19.95 

Super  Huey  1495 

Spell  It 34.95 

Math  Blaster 34  95, 

Word  Attack 34  95J 

Odesia  Chess 4995 

Brimstone 2795 


ACCESS 

Beach-Head 

2195 

Beach-Head  II 

.24  95 

Raid/Moscokv 

2495 

Mach  V-Cart 

.2195 

INFOCOM 

Zork 1  

.2495 

Zork  It  or  III .. 

,2796 

Deadline 

.29.95 

Starcross 

.29.95 

Witness 

.29.95 

Planetlall 

.24.95 

Hitchiker  

.24  95 

Enchanter 

.24,95 

Cutthroats 

.24  95 

Sorcerer 

.2995 

Spellbreaker 

.29,95 

SSI 

Battallion 

Commander  .... 

.24.95 

Battle  ol 

Antielnam 

,32,95 

Fighter  Command 

(No  Atari) 

.3/96 

Norway  85 

(No  Atanl 

.2195 

Panzer  firenidier . . . 

.2495 

USAAF 

.3795 

Breaktbroi>gh/ 

Ardennes  

.3795 

Kampgruppe  

.3795 

Ptiantasie 

..24  95 

,24  95 

earner  Force 

,37  95 

Comp  Ambush  , . . 

,.37  95 

Mech  Brigade 

(No  Alaril 

.3795 

Field  Ol  Fite 

(No  Apple)  

..2495 

Op.  Mkt  Garden  ... 

..3295 

Pro  Tour  GotI 

INo  Ataril 

.,24  95 

GemstoneWarnoi  . 

.,2196 

Imp,  Galactum  . . . . 

.  ,2495 

Computer  Baseball . 

.  ,2496 

Comp,  Quarterback . 

..24  9i> 

For  Techinlcal  Info.,       Order  Inquiries,  or  for  Wise.  Orders 

414-351 -2007 


ORDERING  IN  FORMATION:  Please  ipecll*  tyttim.  For  last  delivery  send  cashier  s  check  or  money  order  Personal  and  company  checks  allow  14  business  days  to  clear  School  PC  s  welcome  CO.!!.  chirgai  irt 
13.60,  In  Conlinental  USA,  include  S3,00  (or  software  orders,  4S  shipping  for  hardware,  minimum  S4  00  Master  Card  and  Visa  orders  please  include  card*,  enplration  date  and  signature  Wl  residents  please  include5^i 
salesian.HI.AK.FPO.APO.  Puerto  Rico  and  Canadian  orders,  please  add  5'ishipping,iiilnlin lira  15.00.  All  other  fonlgnord«r«  idil  15%  iltiMlsj.mlnlmuin  110.00.  All  orders  shipped  outside  the  Continental  U.S. A,  are  shipped 
first  class  insured  U  S  mail  If  foreign  shipping  charges  exceed  the  minimum  amount,  you  will  be  charged  the  addilional  amount  to  get  youi  package  to  you  quickly  and  safely  All  goods  are  new  and  include  factory 
warranty  Due  to  our  low  prices  all  sales  are  final  /III  dilKtin  rifunii  mil  have  i  nturn  lulhorliillon  numbir.  Please  Call  14 14)  351-2007  to  obtain  an  R  A.*  or  your  return  will  not  be  accepted  Prices  and  aval  labil  ity  subject  to 
change  without  notice. 


automatic  centering  and  adjustment  of 
margins.  For  the  128K  Apple  He  and 
Apple  [Ic, 

The  ScreenSnapper  is  designed  for 
use  with  Applesoft  and  machine  code 
programs  running  on  the  Apple  II +  , 
lie,  and  He.  This  program  lets  you  print 
to  the  screen  in  a  variety  of  ways,  in- 
cluding enlargement,  rotation,  inver- 
sion, and  shading.  It  shows  you  what  a 
printout  will  look  like  before  printing. 
ScreenSnapper  will  not  work  with  copy- 
protected software. 

Suggested  retail  price  for  Mouse- 
Prinfz  is  $35.00,  and  $40.00  for  Screen- 
Snapper. 

Available  from  Greengate  Produc- 
tions, Inc.,   2041  Pioneer  Ct.  #15,  San 
Mateo,  CA  94403. 
Circle  Reader  Service  Number  228. 


256K  RAM  For  The  Amiga 

A   256K   display   RAM   card    for  the 
Amiga  installs  behind  the  front  panel 
and  expands  available  memory  for  pro- 
grams and  graphics  to  512K,  The  card 
comes  with  a  one  year  warranty,  manual, 
and  schematics.  It's  designed  for  com- 
patibility with  software  and  hardware. 
Suggested  retail  price  is  $120.00 
Starpoint  Software,  222  South  Broad- 
way, Yreka,  CA  96097-2902. 
Circle  Reader  Service  Number  229. 

CompuServe  And  MCI 
Interconnect 

CompuServe  Inc.  and  MCI  Communi- 
cations Corporation  have  interconnect- 
ed their  electronic  mail  services. 
Subscribers  to  either  of  the  two  systems 
can  instantaneously  communicate  with 
each  other  using  the  same  methods  and 
commands  as  before.  CompuServe's 
InfoPlex  and  EasyPlex  are  both  included. 
Circle  Reader  Service  Number  230. 


HIgh-Level  Language 
For  Amiga 

Designed  by  Professor  Niklaus  Wirth, 
the  creator  of  Pascal,  Modula-2  is  a 
high-level  language  which  encourages 
the  user  to  write  programs  in  modules. 
This  method  of  programming  makes  it 
easy  to  design,  write,  and  maintain  soft- 
ware. Programmers  familiar  with  Pas- 
cal should  be  able  to  learn  the  language 
in  a  few  hours. 

Modula-2  for  the  Amiga  features 
full  interface  to  the  ROM  Kernel,  Intu- 
ition, and  AmigaDOS;  32-bit  native 
code  implementation;  separate  compi- 
lation of  modules  with  version  control; 
a  CODE  statement  for  in-line  assembly 
code;  and  the  ability  to  quickly  locate 
and  identify  errors  in  source  code.  It 


also  supports  transcendental  functions 
and  real  numbers. 

Modula-2,  published  by  TDI  Soft- 
ware, is  not  copy-protected.  Suggested 
retail  price  for  the  regular  version  is 
$89.95;  the  developer's  version  is 
$149.95.  Both  come  with  a  300-page 
manual. 

TD!  Software,  Inc.,  10410  Markison 
Rd.,  Dallas,  TX  75238. 
Circle  Reader  Service  Number  231. 


Commemorative  Version  Of 
Mac  Challenger 

Profits  from  the  sale  of  the  commemo- 
rative version  of  Aegis  Development's 
Mac  Challenger  flight  simulator  for  the 
Macintosh  will  go  to  the  Challenger 
space  shuttle's  Children's  Fund  and  Re- 
build the  Space  Shuttle  Fund.  The  com- 
memorative version  has  a  sticker  on  the 
front  of  the  package  and  is  dedicated  to 
the  seven-member  crew  of  the  Chal- 
lenger space  shuttle. 

Suggested  retail  price  is  $49.95. 

Aegis  Development  Inc.,  2210  Wil- 
shire  Blvd.,   #277,   Santa   Monica,   CA 
90403. 
Circle  Reader  Service  Number  232. 


Home  Accounting  Package 
For  Apple  II 

Schmidt  Enterprises  has  introduced  a 
sophisticated,  easy-to-use  accounting 
package  appropriate  for  use  in  the 
home  or  small  business.  The  Accountant 
can  access  an  unlimited  number  of 
transactions,  with  no  limit  to  the  num- 
ber of  accounts  and  categories  used. 
The  user  can  instantly  retrieve,  print,  or 
delete  any  transaction  or  group  of  trans- 
actions. The  Printed  Transaction  Sum- 
mary feature  allows  the  user  to  print 
and  total  a  selected  group  of  transactions. 
A  profit/loss  statement  can  be  created  by 
subtracting  debits  from  credits. 

The  Accountant  comes  with  a  man- 
ual containing  sample  disk  files  and  a 
tutorial.  An  on-screen  help  menu  is 
available  at  all  times.  No  command 
phrases  are  used,  as  all  functions  can  be 
activated  by  a  single  keypress.  The  pro- 
gram accesses  the  disk  only  for  loading 
the  program  and  saving  data,  which 
makes  search  and  retrieval  functions 
execute  in  seconds. 

The  Accountant  retails  for  $120. 

Schmidt  Enterprises,  7448  Newcastle 
Ave.,  Reseda,  CA  91335. 
Circle  Reader  Service  Number  233. 


Telecommunications 
Package  For  Mac 

Software  Ventures  Corporation  has  be- 
gun shipping  MicroPhone,  a  telecom- 


munication program  for  the  Macintosh 
designed  for  both  novice  and  experi- 
enced computer  users. 

MicroPhone  automates  the  tele- 
communications process,  allowing  the 
user  to  do  things  like  access  stock 
quotes  hourly  or  send  and  receive  elec- 
tronic mail  without  striking  a  single 
key,  freeing  htm  or  her  to  do  other  work 
simultaneously,  The  program  can  re- 
cord complete  telecommunications  ses- 
sions, remembering  any  series  of  key- 
board commands  and  system  prompts. 
The  entire  sequence  can  be  called  up  at 
any  later  time  with  a  single  keystroke, 

MicroPhojie  retails  for  $74.95,  and 
carries  a  30-day  unconditional  money- 
back  guarantee. 

Software  Ventures  Corporation,  2907 
Claremont  Ave.,  Suite  220,  Berkeley,  CA 
94705. 
Circle  Reader  Service  Number  234. 


Penmanship  Practice  On 
Your  Computer  Screen 

Beginning  writers  quickly  get  the  "feel" 
of  correct  letter  formation  with  Touch  'n 
Write,  a  new  penmanship  program  that 
lets  students  practice  handwriting  di- 
rectly on  the  computer  screen.  A  com- 
plete 23-lesson  curriculum  based  on  the 
Palmer  Method  of  manuscript  writing, 
the  program  operates  with  the  Touch 
Window,  a  portable  touch  screen  easily 
attached  to  the  screen. 

Using  their  fingers  or  the  pen  in- 
cluded with  Touch  Window,  young- 
sters first  learn  to  duplicate  basic  letter 
strokes.  Next,  they  trace  and  then  "fin- 
gerpaint"  letters  in  colors  chosen  from 
their  own  on-screen  paint  set.  As  stu- 
dents move  from  one  section  of  a  lesson 
to  the  next,  they  get  rest  and  reward 
through  short  animations  based  on  the 
theme  of  their  choice  --  nature,  fantasy, 
or  the  circus.  When  a  letter  or  number 
lesson  is  completed,  they  can  "touch  'n 
color"  in  an  electronic  picture  book  re- 
lated to  one  of  the  three  themes.  And 
after  a  lesson  is  completed,  a  reward 
certificate  can  be  printed  out. 

Touch  '«  Write,  available  for  64K 
Apple  II  computers,  costs  $69  (software 
only;  the  Touch  Window  is  additional). 

Sunburst  Communications,  Inc.,  39 
Washington  Ave.,  Pleasantville,  NY  10570. 
Circle  Reader  Service  Number  235. 

Cross  Assembler  Program 
For  Atari  ST 

Lamar  Micro  has  developed  a  65C02 
cross  assembler  program  for  the  Atari 
520  ST.  The  C02  Cross  Assembler  allows 
the  ST  to  serve  as  a  software  develop- 
ment system  for  Apple,  Atari,  or  Com- 
modore computers  that  use  the  6502  or 
the  65  CO  2  microprocessor. 


^2i     COMPUTEI      fvlayl986 


Suggested  retail  price  is  $89,95. 

Lamar  Micro,  2107  Artesia  Blvd.,  Re- 
dondo  Beach,  CA  90278. 
Circle  Reader  Service  Number  236. 


Nutrition  Analysis  Program 

Micromedx  has  announced  availability 
of  Macnutriplan,  a  nutrition  analysis 
program  for  the  Apple  Macintosh. 

The  program  asks  the  user  to  type 
in  the  type  and  amount  of  food  that  he 
or  she  has  had  for  each  meal.  It  keeps  a 
running  tally  of  the  meal's  caloric  con- 
tent plus  the  user's  choice  of  any  two 
other  elements,  like  cholesterol,  satu- 
rated fat,  vitamin  B-6,  or  potassium,  tn 
addition,  maximum  values  for  any  of 
these  tallies  can  be  set,  causing  an 
audible/visual  alarm  to  go  off  when 
exceeded.  If  the  user  requests  further 
analysis,  the  program  will  ask  for  the 
user's  name  and  age,  and  calculate 
what  percentage  of  his  or  her  recom- 
mended daily  allowance  of  key  nutri- 
ents the  meal  will  supply. 

The  program  comes  with  a  built-in 
directory  of  caloric  and  nutritional  con- 
tent of  more  than  400  common  foods; 
up  to  200  more  can  be  added, 

Macnuiriplan  requires  150K  mem- 
ory in  a  512K  Macintosh,  one  disk 
drive,  and  Microsoft  BASIC  2.0.  Sug- 
gested retail  price  is  $75. 

Micromedx,    187  Gardiners  Ave., 
Levitt  own,  NY  11756. 
Circle  Reader  Service  Number  237. 


Stock  Update  Package  For 
Managing  Your  Money 

The  Micro  Education  Corporation  of 
America  has  expanded  its  offerings  by 
introducing  Managing  The  Market,  a 
stock  price  update  package  for  the  IBM- 
PC  that  automatically  accesses  Dow 
Jones  News/Retrieval  Service. 

Managing  The  Market  is  a  cost- 
effective  communications  program  that 
allows  you  to  update  securities  auto- 
matically via  modem.  The  program  can 
be  used  in  conjunction  with  Andrew 
Tobias'  financial  package  Managing 
Your  Money,  or  by  itself  with  spread- 
sheets like  Lotus  1-2-3.  An  onscreen 
stopwatch  helps  keep  track  of  time 
spent  online.  Once  connected  to  the 
service,  all  data  is  stored  in  a  file  so  the 
user  can  log  off  quickly  (reducing 
phone  charges)  and  review  the  infor- 
mation at  his  or  her  leisure.  Users  can 
also  create  customized  "hot  lists"  of  up 
to  225  securities  to  check  key  prices  at  a 
glance,  saving  the  time  and  expense  of 
running  through  their  entire  list  of 
securities. 

Managing  The  Market  runs  on  the 
IBM-PC  and  PCjr  (with  256K),  and  re- 
quires DOS  2.0  or  any  later  version. 


ON  LIMITED  SUPPLY  OF 


<•::  :[• » : 


PLUS/4™  COMPUTERS 

AND  FAMOUS  BRAND  DISK  DRIVES 


INCLUDES 

BUILT-IN 

SOFTWARE 

for  word  processing,^ 

file  management, 

spreadsheets 

and  128  color  graphics! 

Ideal  for  home  or  business! 

Perfect  for  programmers! 


^f 


Commodores  designed  Plus/4^"  for  smafi 
businesses  and  programmers...  then  made 
it  VERY  EASYfor  novices  to  learn  and  use. 
For  programmers,  this  machine  has  easv- 
to-use  powerful  commands  and  60K  of 
usable  memory.  And  vou  can  hook  up  as 
many  as  four  disk  drives. 

FOUR  highly  popular  programs  are  BUJLT- 
INTO  the  machine.  And  they  quickly  inter- 
act with  each  otherl  Use  the  FILE  MANAGE- 
MENTprogram  for  mailing  lists,  inventories, 
personal  or  business  files,  eJc,  Write  and 
edit  letters,  reports,  student  papers  with  the 
WORDPROCESSOR  before  final  printout. 

Do  the  books,  budgets,  sales  forecasts, 
profit/loss  statements,  etc.,  with  SPREAD- 
SHEET program.  Every  time  you  change  a 
number.  Plus/4"' immediaJely  recalculates 
entire  spreadsheet.  Combine  the  calcula- 
tions with  WORDPROCESSOR  text. 

Use  GRAPHICS  program  to  draw  simple  or 
complex  shapes.   GRAPHICS  works  with 


PLUGS 

INTO  YOUR 

TV  FOR  A 

MONITOR! 


SPREADSHEET  or  WORDPROCESSOR,  so 
vou  can  display  calculations  in  up  to  128 
colors. ..or  include  graphics  in  yourtext. 

Touch  a  key  lo  go  from  one  built-in  program 
to  another.  Additionai  software  is  available 
for  a  variety  of  businesses  or  personal  uses. 
Games  available,  too! 

ADDITIONAL  FEATURES:  Data  base  of  99 
records.  Computer  holds  99  lines  of  text 
before  it  must  be  transferred  to  disk  drive  for 
storage.  Excellent  terminal  for  use  with 
modem.  Split  screen  and  windowing  cap- 
abilities. Compatible  with  all  Commodore® 
hardware  except  joystick  and  datasel.  NOT 
compatible  with  C64  software. 

Includes  Commodore'^  warranty. 


Mfr.Ust:*299.00 

Closeout  Price 


$79 


Hem  H.1 166.5036<»1  Ship,  handling:  S8.00 


DISK  DRIVE 


(Compatible  with  PluV4'") 


A  famous  U.S.  brand,  bul  were  not  permitted  lo 
print  tlie  name.  Factory  reconditioned  and  war- 
ranted. Intelligent,  high-speed.  2K  RAM,  16K 
ROM.  Maximum  storage  of  170K  formatted  data. 
35  tracks.  Uses  5'/j"  floppy  diskette;  single  sided, 
single  density  (double  density  can  be  used,  bul  not 
needed).  Serial  interface.  Second  serial  port  for 
chaining  second  drive  or  printer.  Data  transfer  rale 
of  400  bps.  Compatible  with  C64.  VIC  20.  SX64, 
Educaior  64,  C16  and  Plus./4"-' 

Mfr.  List  When  New:  ^269.00 

Closeout  Price    


$149 


Item  H-n 66-3553-01 3  Ship,  handling  £8,00 


Credit  card  customers  can 


order  by  phone,  ?4  hours      f^^^^Jl 
a  day,  7  days  a  week  >^-^~-  ■    ■ 


3  day,  7  days 

Toil-Free:  1-800-328-0609 

^^^    Your  check  is  welcome' 

Pfj^^S   No  delays  in  orders  patd  by  check. 

Sales  Quisde  contmenial  U.S.  are  subjecl  lo  special 
conditions  PJease  call:  or  wnle  to  inquire 


C.O.M.B. 

DIRECT  MARKEnNG  CORP. 

AuUiorizedUquUator 

14605  2B11I  AVENUE  NORTH 
MINNEAPOUS.  MN  55441-3397 


C.O.M.B,  Direct  Marketing  Corp.      Item  H-1 166 
14605  2StJi  Ave.  N./Minneapolis,  MN  55441-3397 

Send Cammodore-i   Plus/4^"  Co(npu■ter^s)  Item  H- 

1  ^66-5035-001  at  S79  each  plus  SS  each  tor  shia,  handling 

Send Dli!(  Dnve(sl  Item  HO  156-3553-013  ai   S149 

each  plus  58  each  for  shipping,  handling 

{Minnesota  residents  add  6%  sales  tax  Allow  3-4  weeks  for 

dettvery.  Sorry,  no  C.O.D  orders.) 

n  My  check  or  money  order  fs  enclosed,  {Mo  delays  in 

processtng  orders  pafd  by  check,  ihanks  to  TeleCheck.) 
Charge  to  mv:  □  MasierCard^,     C  VJSAJ'r                      # 
Accl,  No Enp — I 


PLEASE  PRINT  CLEARLY 
Name  


Citv- 


Sign  Here 


Suggested  retail  price  is  $149.95,  which 
includes  a  free  password  for  Dow  Jones 
News/Retrieval  Service  (a  $75  value) 
and  an  hour's  free  connect  time. 

Micro   Education   Corporation   of 
America,  285  Riverside  Ave..  Westport, 
CT  06880. 
Circle  Reader  Service  Number  238. 


Chess  Tutorial  And  Game 
For  Apple  And  Commodore 

Enlightenment,  Inc.,  has  announced 
the  availability  of  Paul  Whitehead 
Teaches  Chess,  a  combination  chess 
tutorial/opponenent  for  IBM,  Apple  11, 
and  Commodore  64  computers. 

The  tutorial  is  designed  to  take  the 
user  from  not  knowing  anything  at  all 
about  chess  to  the  point  where  he  or 
she  can  beat  a  middle-level  chess  play^ 
er.  It  is  driven  by  a  database  that  con- 
tains a  tree-like  structure  where  the 
user's  choices  guide  the  branching  of 
the  presentation.  This  allows  the  user  to 
skip  over  information  that  he  or  she 
already  knows.  Each  branch  contains 
both  moves  and  comments  integrated 
together.  The  commentary  appears  and 
disappears  every  half  move,  so  you  can 
see  an  anylisis  of  your  game  while  the 
players  are  on  the  screen. 

Once  the  user  is  ready  to  take  on 
an  opponent,  the  Coffeehouse  Chess 
Monster  is  a  formidable  one.  The  Apple 
and  Commodore  versions  of  this  game 
portion  of  the  program  were  written  by 
international  master  Julio  Kaplan.  The 
IBM  version  is  a  customization  of  the 
SPOC  program  from  Cypress  Software. 
All  three  versions  retail  for  $49.95. 

EnUghtemtient,  Inc.,   1240  Sanchez 
St.,  San  Francisco,  CA  94114. 
Circle  Reader  Service  Number  239. 


True  BASIC  Prices  Reduced 

Addison-Wesley  has  cut  its  site  licens- 
ing fee  for  True  BASIC  from  $5,000  to 
$1,250  in  hopes  of  attracting  more  in- 
terest from  high  schools  and  colleges. 
In  addition,  the  publisher  is  introducing 
True  BASIC  packages  designed  for 
students. 

True  BASIC  Student's  Reference  Kit, 
available  for  the  IBM  PC  or  the  Macin- 
tosh, includes  full-function  software 
and  a  reference  manual  for  $49.95.  True 
BASIC  Student's  User  Kit,  being  sold  for 
$41.95,  includes  the  software  and  user 
manual. 

True  BASIC,  a  product  of  John  Ke- 
meny  and  Thomas  Kurtz,  the  original 
creators  of  BASIC,  features  increased 
speed,  multi-line  functions,  named  sub- 
routines, windows,  and  portability  be- 
tween the  Macintosh  and  IBM  PC. 

A  student  calculus  program.  Calcu- 
lus Student's  Toolkit,  for  the  Apple  II 


and   IBM   PC   also   is   available.   The 

$19.95  program  assists  students  in  mas- 
tering topics  such  as  limits,  differentia- 
tion, and  integration. 

Addiso7i-Wesley  Publishing  Compa- 
ny, Educational  Media  Systems  Division, 
Reading,  MA  01867. 
Circle  Reader  Service  Number  240. 


Submarine  Simulation 

Overt  Strategic  Simulations  has  an- 
nounced OPERATION:  keystone,  a  sub- 
marine simulation  for  IBM  PCs  and 
compatibles  with  at  least  200K  RAM. 

The  program,  which  sells  for  $69, 
features  randomly  generated  mission 
assignments  and  stresses  strategic  plan- 
ning over  quick  reflexes. 

Overt   Strategic   Simulations,    P.O. 
Box  66424,  Los  Angeles,  CA  90066. 
Circle  Reader  Service  Number  241. 


Software  Catalog  On  Disk 

Electronic  Courseware  Systems,  Inc. 
has  made  available  a  disk  version  of  its 
software  catalog.  The  disks,  available 
now  for  Apple  and  Commodore  64 
with  an  IBM  version  expected,  catalog 
the  company's  instructional  software 
offerings,  including  music,  MIDI,  math, 
science,  language  arts,  and  utility 
programs. 

The  disk  is  available  for  $2.99, 
which  is  refundable  if  software  is  pur- 
chased from  the  catalog.  Paper  versions 
of  the  catalog  are  available  at  no  charge. 

Electronic  Courseivare  Systems,  Inc, 
1210lancasterDr.,  Champaign,  IL  61821, 
Circle  Reader  Service  Number  242. 


Computerized  Classic 

A  computer  version  of  Treasure  Island 
has  been  indroduced  by  Classics  on 
Computer.  The  game,  designed  for  stu- 
dents in  grades  5-9,  is  intended  to  help 
students  rediscover  the  joys  of  reading. 
A  player's  progress  in  the  game  de- 
pends on  reading  comprehension  and 
vocabulary-building  skills. 

This  adaptation  of  the  Robert  Louis 
Stevenson  novel  is  available  for  Apple 
II  series  computers  for  $39.95. 

Classics  on  Computer,  5150  Wilshire 
Blvd.,  Suite  502,  Los  Angeles,  CA  90036. 
Circle  Reader  Service  Number  243. 


Goto  For  64 

Spectrum  Holobyte,  Inc.,  has  intro- 
duced a  Commodore  64  version  of  the 
popular  World  War  II  submarine  simu- 
lation game,  Gato,  previously  available 
for  the  Apple  and  IBM  computers. 

Gato  puts  you  in  the  captain's  seat 
of  a  World  War  II  "Gato"  class  subma- 
rine, as  you  play  against  the  computer 


to  decide  who  controls  the  seas.  The  64 
version  includes  eight  missions,  five 
difficulty  levels,  and  three  ships.  And 
the  Commodore  version  uses  the  64's 
sound  capabilities  to  add  realism,  in- 
cluding a  digitized  voice  to  receive  mis- 
sion assignments  from  SUBCOM. 

Suggested  retail  price  is  $29.95. 

Spectrum  HoloByte,  Inc.,  1050  Wal- 
nut, Suite  325,  Boulder,  CO  80302. 
Circle  Reader  Service  Number  244, 


1 28  Program  Generator 

OMNISoft  &  Associates  has  introduced 
OMNICodel,  a  program  that  generates 
source  code  in  writing  BASIC  programs 
and  subroutines  to  handle  screen  for- 
matting, input,  and  compiled  output. 
The  code  generated  is  modular,  RE- 
Marked,  and  compiler-compatible. 

OMNICodel  has  a  user  interface 
designed  so  that  even  a  novice  will  be 
comfortable  in  the  operating  environ- 
ment. For  the  experienced  programmer, 
the  package  can  save  hours  of  work. 

The  Commodore  128  version  re- 
quires at  least  one  1541  or  1571  disk 
drive  and  an  80-column  display  (either 
color  or  monochrome).  It  writes  Com- 
modore BASIC  7.0,  and  is  compatible 
with  the  BL1TZ!-128  BASIC  Compiler 
from  Skyles  Electric  Works.  Retailing 
for  $89.95,  the  package  includes  OMNI 
Merge-128,  which  allows  the  user  to 
merge  tokenized  BASIC  programs  and 
subroutines. 

OMNISoft  &  Associates,  P.O.  Box 
280,  Rogers,  AZ  72756. 
Circle  Reader  Service  Number  245. 


Geopolitical  Simulation 
For  IBM 

Mindscape  has  announced  that  its 
highly-acclaimed  Balance  of  Power,  pre- 
viously available  only  for  the  Macin- 
tosh, will  be  available  in  IBM  format 
this  June. 

Written  by  noted  software  designer 
Chris  Crawford,  this  one-  or  two-player 
strategy  game  allows  players  to  assume 
the  role  of  either  the  President  of  the 
United  States  or  the  General  Secretary 
of  the  Soviet  Union  for  a  fictional  eight- 
year  period.  Each  leader  must  work  to 
enhance  his  or  her  country's  prestige, 
yet  avoid  nuclear  war.  They  can  sup- 
port friendly  governments,  move 
against  unfriendly  governments,  and 
try  to  foil  the  same  efforts  of  the  oppos- 
ing superpower. 

Balance  of  Power's  vast  database  of 
information  on  the  62  nations  repre- 
sented in  the  game  helps  players  make 
their  strategic  decisions.  Players  can 
learn  about  a  country's  political  stabil- 
ity, GNP,  literacy  rate,  and  financial 
assistance  to  and  from  other  nations.  As 
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players  develop  strategies,  all  data  must 
be  considered  in  light  of  international 
events  presented  as  news  items.  The 
scenario  is  constantly  changing. 

With  Microsoft  Windows  as  the 
user  interface,  the  IBM  version  creates  a 
gameplay  environment  virtually  identi- 
cal to  that  of  the  Macintosh  computer. 

The  IBM  version  of  Balance  of  Pow- 
er is  $49.95. 

Mindscape,  Inc.,  3444  Dundee  Rd., 
Northbrook,  IL  60062. 
Circle  Reader  Service  Number  246. 


Commodore  i/0 
Controller  Card 

The  BHIOO  General  Purpose  I/O  Card 
is  an  intelligent  input-output  device 
from  Intelligent  I/O,  Inc.,  for  the  VIC- 
20,  Commodore  64,  and  128.  The  card 
provides  a  total  of  eight  8-bit  parallel 
ports  (32  separate  input  and  32  separate 
output  lines).  Since  the  ports  are  memo- 
ry mapped,  data  is  sent  or  retrieved  by  a 
single  POKE  or  PEEK  command. 

The  card  can  be  used  in  a  home 
control  application,  controlling  lights, 
appliances,  relays,  motors,  heating/ 
cooling  systems,  and  other  electrical 
devices,  It  can  also  be  used  for  more 
sophisticated  applications,  like  labora- 
tory data  acquisition,  automated  testing/ 
experimentation,  and  security  systems, 


and  can  be  connected  to  analog-to-digital 
and  digital-to-analog  converters. 

Suggested  retail  price  is  $129. 

Intelligent  I/O,  Inc.,  30  Lawrence 
Ave.,  Potsdam,  NY  13676. 
Circle  Reader  Service  Number  247. 


Programming  Utility 
For  Amiga 

Gimpel  Software  has  announced  the 
availability  of  Amiga-Lint,  a  diagnostic 
facility  for  the  C  programming  lan- 
guage running  on  the  Commodore 
Amiga.  It's  similar  to  the  Lint  that  runs 
on  the  Unix  operating  system. 

Amiga-Lint  will  analyze  C  pro- 
grams and  report  on  bugs,  glitches,  and 
inconsistencies.  It  helps  develop  reli- 
able programs  and  port  programs  over 
from  other  machines  and  operating 
systems. 

Some  of  the  types  of  errors  report- 
ed by  Amiga-Lint  include  parameter- 
argument  mismatches,  library  usage 
irregularities,  variables  declared  but  not 
used,  and  suspicious  use  of  operators 
and  unreachable  code.  The  program's 
features  include  full  K  &  R  support,  fast 
one-pass  operation,  no  fixed- size  tables 
to  overflow,  and  special  LiMf-style  com- 
ments to  suppress  errors.  Amiga-Lint 
runs  under  the  Amiga's  CLI  interface. 

Suggested  retail  price  is  $98. 


Gimpel  Software,  3207  Hogarth  Ln., 
Collegeville,  PA  19426. 
Circle  Reader  Service  Number  248. 


Apple,  IBM  Math  Tutorials 

Mindplay  has  introduced  two  programs 
that  help  children  learn  about  math 
while  they're  having  fun. 

In  Campaign  Math,  players  practice 
their  math  skills  as  they  research  issues, 
raise  funds,  and  choose  the  advertising 
media  that  will  help  them  win  an  elec- 
tion. This  helps  them  hone  not  only 
their  math  skills,  but  their  knowledge 
of  political  science  elements  like  plat- 
form issues,  surveying  techniques,  pop- 
ulation size,  and  fundraising.  In 
RoboMath,  arcade  action  inspires  robo- 
mathematicians  to  practice  multiplica- 
tion and  division  as  they  close  down 
trashbot  factories.  Players  choose  a 
quick-answer  method  or  use  the  screen 
to  work  out  more  difficult  problems 
with  a  unique  step-by-step  process  that 
prompts  development  of  long  division 
or  multiplication  skills. 

Both  programs  are  available  for 
IBM  PC  and  Apple  II  computers,  and 
retail  for  $39.95  each. 

Mindplay  Software,  Methods  &  Solu- 
tions, Inc.,  82  Montuale  Ave.,  Stoneham, 
MA  02180. 
Circle  Reader  Service  Number  249,        © 
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D  Save  33%  off  the  single  issue  n  Save  even  more!  2  year  subscription, 

price.  1  year  subscription,  £39.95  $69.95 

All  Disk  orders  must  be  prepaid. 

D  Payment  enclosed  (check  or  money  order) 
^n  Charge    D  MasterCard    D  Visa 

Acct.  No. _„  Exp.  Date 

Signature 

ie 

Address 


»-?< 


City State Zip . 


(Outside  U.S.  and  Canada,  add  $9.00  per  year  for  stiipping  and  handling.) 


J1528 


BUSINESS  REPLY  MAIL 

FIRST  CLASS      PERMIT  NO,  7551      DES  MOINES,  lA 
POSTAGE  WILL  BE  PAID  BY  ADDRESSEE 


NO  POSTAGE 
NECESSAPY 
IF  NMILED 
IN  THE 
UNITED  STATES 


COMPUTERS  DISK 

P.O.  BOX  10036 

DES  MOINES,  !A  50347 


COMPUTES's  APPLE  APPLICATIONS  SPECIAL 


n  COMPUTEI's  Apple  Applications 
Special,  Spring  1986    $3.95 

(In  U.S.  add  S1.00  shipping  and  handling 
charges;  outside  U.S.  add  S2.00) 


D  Companion  Disk  to  COMPUTE!^ 
Apple  Applications  Special. 
Spring  1986    $16.95 
(Add  $2.00  shipping  and  handling  charges) 


To  order,  send  in  tinis  card  with  your  payment  or  call  toll-free  800-346-6767. 
ALL  ORDERS  MUST  BE  PREPAID  IN  U.S.  FUNDS.  (in  ny 212-887-8525,1 

□  Payment  enclosed  [check  or  money  order). 
D  Charge;  D  Visa    D  MasterCard 


Account  No. 
Signature 


Exp.  Date- 


(Required) 


[IJequired  when  using  credh  card.) 


Name 

Address. 
City 


(Please  prlntj 


State_ 


Zip_ 


AAC586 


COMPUTEMs 

APPLE  APPLICATIONS  SPECIAL 

6th  FLOOR  SALES  DEPARTMENT 
825  Seventh  Ave, 
Nev^York,  NY  10019 


COMPUTEI's 

FREE  Reader  Information  Service 

Use  these  cards  to  request  FREE  information  about  the  products  ad- 
vertised in  this  issue.  Cieariy  print  or  type  your  fuli  name  and  address. 
Oniy  one  card  shouid  be  used  per  person,  Circie  the  numbers  that 
correspond  to  the  key  number  appearing  in  the  advertisers  index. 

Send  in  the  card  and  the  advertisers  wili  receive  your  inquiry.  Al- 
though every  effort  is  made  to  insure  that  only  advertisers  v^^ishing  to 
provide  product  information  have  reader  service  numbers,  compute! 
cannot  be  responsible  if  advertisers  do  not  provide  literature  to 
readers. 

Please  use  these  cards  on// for  subscribing  or  for  requesting  product 
information.  Editorial  and  customer  service  inquiries  should  be  ad- 
dressed to:  COMPUTE!,  P,0,  Box  5406,  Greensboro,  NC  27403.  Check 
the  expiration  date  on  the  card  to  insure  proper  handling. 

Use  these  cards  and  tnis  aadress  only  for  computei's  Reader  Infor- 
mation Service.  Do  not  send  wltti  payment  in  any  form. 


COMPUTE! 


101   102   103   104   105   106   107   108   109   110   111   112   113   114   115   116 


122 


118   119   120   121 
135   136   137   138   139   140   141 

158 


123  124  125  126  127  128  129  130  131  132  133 
142  143  144  145  146  147  148  149  150 
159   160   161   162   163   164   165   166   167 


152  153  154  156  156  157 

169  170  171  172  173  174  175  176  177  178  179  180  181  182  183  184 

186  187  188  189  190  191  192  193  194  195  196  197  198  199  200  201 

203  204  205  206  207  208  209  210  211  212  213  214  215  216  217  218 

220  221  222  223  224  225  226  227  228  229  230  231  232  233  234  235   236 

237  238  239  240  241  242  243  244  245  246  247  248  249  250  251  252   253 


117 
134 
151 
168 
185 
202 
219 


Please  let  us  know.  Do  you 


own: 
D 

270 

D 

272 

D 

u 

276 

D 

278 

D 

260 


plan  to  buy: 


Apple . 
Atari  — 


Commodore 
IBM 


TI-99/4A 
other  _ 


(speoity  model> 


D 

271 

D 

273 

D 

275 

a 

277 

D 
S75 

D 
281 


Please  print  or  type  name  and  address. 
Limit  one  card  per  person. 

Name 


Address 


City 


State/Province 


Zip 


Country 


Phone 


Piease  Include  ZIP  Code 


ixpirollon  Da1©  6/30/B6 


C05B6 


SUBSCRIBE  TO  COMPUTE! 

My  Computer  Is: 

01  D  Apple     02  D  Atari     03  D  Commodore  64 

04  n  VIC-20     06  D  IBM     06  D  TI-99/4A 

wD  Other D  Don't  yet  hove  one. 


For  Fastest  Service, 

Call  Our  Toil-Free 

us  Order  Line 

snf;-:>.L7.^.:yo 

In  lA  call  1-S00-S32-1272 


D  $24,00  One  Yeor  US  Subscription 
D  $45,00  Two  Year  US  Subscription 


Name 


Address 


City 


State 


Zip 


D  Payment  Enclosed     D  Bill  me 

Charge  my:  D  VISA     D  MasterCard     D  American  Express 

Account  No,  Expires  / 


Vogr  subscripHon  will  E>egin  with  fhe  r\e%\ ovoiable  Issue.  Pfeoto  allow 4-6  weeks  for  delivery  of  tiist  issue.  Subscription  Dtlces sutijed  to 
change  at  ony  time.  Outside  the  U.S  A  pleose  ode}  S6  for  eac^  subscription.  , .  .„» 

JImD 


Place 

Stamp 

Here 


COMPUTE'  Reader  Service 

P.O.  Box  2141 
Radnor,  PA  1 9089 


NO  POSTAGE 

NECESSARY 

IF  MAILED 

fNTHE 

UNITED  STATES 


BUSINESS  REPLY  MAIL 

FIRST  CLASS  PERMIT  NO.  7478  DES  MOINES,  IOWA 


POSTAGE  WILL  BE  PAID  BY  ADDRESSEE 


COMPUTE! 

PO  BOX  10954 

DES  MOINES,  IOWA  50347 


SUPER  HUEY 

America's  #1  Helicopter  Flight  Simulator 

Forget  the  disappointment  of  other  flight  simulators  . . ,  SUPER  HUEY 

has  eliminated  them!  -  Commodore  Power  Play  Magazine 

"One  of  the  best  flight  simulators  ever  tested !"  -  En/Bobo,  Run  Magazine 


Handles  like  a  real 

helicopter.  All  your 

flying  skill  will  be 

needed. 

FOUR 

ACTION-PACKED 

ADVENTURES! 

Solo  Flight  •  Rescue 
Explore  •  Combat 


Race  ajainst  King  Richard  Petty  anil 

18  lop  drivers  A  real  life  3-0  main 

event 

Atari*  •  CommcxJore*  64/128" 


c#smi 


You  I  skiH  as  an  archer  can  protect 
you  from  ttic  giant  spiders,  snakes, 
dragons,  trogs.  ptiantoms  and. 
linally.  Itic  demogorson. 
Atan*  •  Commodore"  M/«28" 


where  the  action  is: 

415  North  Figueroa  Street,  Wilmington,  CA  90744    •    (213)  835-9687 


All  you  need  to  do  this 


-v7   '■ 


.'■,':■■■     t   * 


i ;  ■ 

!'  ■ 

■ti-' 

i 

'  ;^ 

?>.*. 

' 

! 

graph  a  spreadsneet 


"fittt^nfete^ti 


bill 


t';,'tt. 


write  a  novel 


fix  an  engine        i. 


corriipose  a  song 


painf  a  picture 


yourbonKing 


learn  fo  fly 


organize  c  Ja'c  ccisc 


tell  a  storv 


®  1983.  Commodore  Electronics  limiied 
®  CP/M  !•.  a  regrsrered  rrademorlc  of  Digilol  Research,  fnc 
^  Appie  IS  G  regrslered  rrodemorfc  of  Appte  Comporcr  irM: 
%  IBM  rs  0  re^islered  Iraderr^ork  of 

Internolionol  Buaness  Machines  CorpcoTlon 
*  Commodore  44  is  a  regislefed  Ifodemark  of  Commodore  EiecTromcs  ua 


When  if  comes  fo  personal  connpufers,  you 
wanf  the  smartesf,  at  a  price  that  maKes  sense. 
The  new  Commodore  128"  system  hos  a 
powerful  128Kmemon/ expandable  by  51 2K. 
An  80-column  display  and  64, 1 28  and  CP/M® 
modes  for  easy  access  to  fhousonds  of  edu- 
cational, business  and  home  programs.  And  o 
keyboard,  with  built-in  numeric  keypad,  that 
operates  with  little  effort. 

Or  if  the  Commodore  128  is  more  machine 
than  you  hod  in  mind,  you  can  pick  up  the 
Commodore  64?  The  Commodore  64  is 
our  lower-  priced  model  geared  to  more 
fundamental,  basic  needs. 

Discover  personol  computers  thof 
do  more  for  you.  At  prices  you've 
■  been  waiting  for.  From  the  company 
that  sells  rnore  personal  computers 
than  IBM®  or  Apple® 

COMMODORE  128  AND  64^  PERSONAL  COMPUTERS 

A  Higher  Intelligence  •       . 


